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 vote139 views2 answers
Checking and changing system volume vb.net
VBA
1 vote115 views1 answer
Excel vba convert cells(1,1) into A1 and vice versa
VBA
3 votes132 views1 answer
Vba http request json
VBA
0 vote113 views1 answer
Remove frist letter from string vbnet
VBA
5 votes149 views1 answer
Excel vba last byte from INTEGER
VBA
0 vote124 views3 answers
Write to text file vb.net
VBA
0 vote116 views1 answer
Quit excel with save changes dialog vb.net
VBA
1 vote125 views1 answer
Excel vba get column name from number
VBA
0 vote113 views1 answer
Find days in month vba
VBA
0 vote134 views1 answer
Label de tableau dans des label.text en VBA
VBA