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 vote246 views1 answer
Excel web scraping
VBA
1 vote171 views1 answer
Ms access open form to new record
VBA
4 votes175 views2 answers
Vba last row
VBA
0 vote216 views1 answer
Vb window.minimize
VBA
0 vote240 views1 answer
Vba string
VBA
0 vote231 views1 answer
How to extract a file from an ISO:
VBA
0 vote228 views1 answer
Vba type variable
VBA
15 votes461 views1 answer
Excel vba wait
VBA
0 vote237 views1 answer
Add text to Shape VBA
VBA
2 votes233 views1 answer
Excel vba check if string entirely alpha
VBA