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 vote286 views1 answer
Excel vba disable copy paste
VBA
2 votes302 views1 answer
Excel vba date to string conversion
VBA
0 vote305 views1 answer
Excel vba automatic calculation
VBA
0 vote316 views1 answer
VBA Loop to range
VBA
-1 vote295 views1 answer
Text to speech vb.net
VBA
0 vote302 views1 answer
Vb net check if file exists
VBA
0 vote302 views1 answer
Vba line feed
VBA
3 votes290 views1 answer
Excel vba last row in range
VBA
0 vote308 views1 answer
Backspace key has stopped working visual studio
VBA
0 vote314 views2 answers
Delete all controls from list of control vb.net
VBA