Vba low 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 vote218 views1 answer
Excel vba current folder
VBA
0 vote211 views1 answer
Excel vba populate array with cell values
VBA
0 vote216 views1 answer
Do while not vb.net
VBA
0 vote270 views1 answer
Wpf dark title bar
VBA
0 vote244 views1 answer
Vba code to select image in sheet
VBA
0 vote182 views1 answer
Vba set vs dim
VBA
5 votes245 views1 answer
Excel vba right word from Long Integer
VBA
0 vote213 views1 answer
Excel vba address not absolute
VBA
0 vote219 views3 answers
Write to text file vb.net
VBA
0 vote259 views1 answer
Excel vba scroll to cell
VBA