/VBA/Excel vba left word from Long Integer

Excel vba left 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

1 vote164 views1 answer
Excel vba Run a Macro every time sheet is changed
VBA
3 votes206 views2 answers
Vba date to string
VBA
0 vote186 views1 answer
Vbscript Trim
VBA
0 vote173 views1 answer
Vb.net change cursor to wait
VBA
0 vote176 views1 answer
Vba html document reference
VBA
0 vote174 views1 answer
Excel vba extract year
VBA
0 vote199 views2 answers
Get unique random number in vb.net
VBA
0 vote166 views1 answer
Excel vba send HTTP POST to server
VBA
1 vote171 views1 answer
How to check is the value enterd is a number or text in vba
VBA
18 votes351 views2 answers
Vba make word from bytes
VBA