/VBA/Excel vba right word from Long Integer

Excel vba right 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 vote219 views2 answers
VB
VBA
0 vote200 views1 answer
System.Runtime.InteropServices.COMException: 'Call was rejected by callee. (Exception from HRESULT: 0x80010001
VBA
5 votes221 views1 answer
Vba low byte from INTEGER
VBA
0 vote197 views1 answer
How to use VBA to add new record in MS Access?
VBA
0 vote198 views1 answer
Excel vba automatic calculation
VBA
0 vote212 views1 answer
How to mount floppy disks in vb.net
VBA
0 vote247 views1 answer
How to call gcd in vba
VBA
2 votes153 views1 answer
Excel vba pause
VBA
0 vote190 views1 answer
Compare dates vb
VBA
1 vote214 views1 answer
Vba loop through files in folder
VBA