/VBA/Excel vba high word from Long Integer

Excel vba high word from Long Integer

'If n is a 4-byte Long Integer, the Low (Left) Word is:
If n And &H8000& Then
  	LoWord = n Or &HFFFF0000
Else
    LoWord = n And &HFFFF&
End If

'If n is a 4-byte Long Integer, the High (Right) Word is:
HiWord = (n And &HFFFF0000) \ &H10000

Source: academy.excelhero.com

Similar codes

0 vote238 views1 answer
Vba vbcrlf chr
VBA
0 vote212 views1 answer
Make your computer talk vbscript
VBA
0 vote266 views1 answer
Visual basic run command
VBA
1 vote201 views1 answer
How to do error handling in access vba
VBA
0 vote215 views1 answer
Excel vba extract year
VBA
-1 vote240 views1 answer
Text to speech vb.net
VBA
0 vote233 views1 answer
COMO GRAVAR U VALOR NO ARQUIVO APPSETINGS EM VB NET
VBA
0 vote208 views1 answer
Excel vba disable mouse click
VBA
8 votes487 views1 answer
Vba convert 2 bytes to an integer
VBA
0 vote201 views1 answer
Vbnet access System.InvalidOperationException: 'Update requires a valid UpdateCommand when passed DataRow collection with modified rows.'
VBA