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

5 votes182 views1 answer
Excel vba first byte from INTEGER
VBA
15 votes293 views2 answers
Xl vba dynamic string array
VBA
4 votes158 views2 answers
Vba create folder if not exist
VBA
-1 vote152 views1 answer
Vba sendkeys
VBA
0 vote158 views1 answer
Search in richtextbox vb.net
VBA
0 vote157 views1 answer
Excel vba cell on change
VBA
0 vote155 views1 answer
Excel named range sum
VBA
0 vote174 views1 answer
Excel vba named range exists
VBA
0 vote168 views1 answer
VBA OR vb6 find OR replace string from the end
VBA
0 vote168 views1 answer
Visual stuiod not recognising desgined labels
VBA