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

8 votes261 views1 answer
Vba make a short integer from two bytes
VBA
0 vote254 views1 answer
Excel vba delete columns in range
VBA
0 vote191 views1 answer
Excel vba populate array with cell values
VBA
1 vote216 views2 answers
Get all column names from excel vba
VBA
0 vote207 views1 answer
Vb.net change cursor to wait
VBA
0 vote235 views1 answer
Vba ternary
VBA
0 vote208 views1 answer
Backspace key has stopped working visual studio
VBA
0 vote230 views2 answers
Get unique random number in vb.net
VBA
0 vote200 views1 answer
Vb streamreader
VBA
0 vote205 views1 answer
Vba text to general
VBA