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 vote151 views1 answer
Excel last used row
VBA
0 vote139 views1 answer
Vba code to open a file with login rights
VBA
0 vote142 views1 answer
Vbscript check if string is empty
VBA
0 vote138 views1 answer
Vba remove numbers from string
VBA
0 vote152 views1 answer
Open file dialog in vb.net
VBA
4 votes93 views2 answers
Vba last row
VBA
1 vote94 views1 answer
How to open cmd with vbd
VBA
0 vote150 views1 answer
Search combobox items vb.net
VBA
0 vote192 views1 answer
Find control with name vb
VBA
0 vote159 views1 answer
Excel vba protect scenarios
VBA