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 vote325 views1 answer
Vba round to 2 decimals
VBA
0 vote326 views1 answer
Find control with name vb
VBA
0 vote342 views1 answer
Excel vba add reference programmatically
VBA
0 vote319 views1 answer
Vba code to open a file with login rights
VBA
0 vote318 views1 answer
Vbnet add axis labels to chart
VBA
0 vote315 views1 answer
Vba border weight
VBA
5 votes392 views1 answer
Excel vba get low byte from INTEGER
VBA
0 vote357 views1 answer
(SecurityProtocolType)3072 vb.net
VBA
0 vote328 views1 answer
VBA is form loaded
VBA
0 vote316 views1 answer
Do while not vb.net
VBA