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

3 votes178 views1 answer
Excel insert blank row for value change in column
VBA
1 vote171 views1 answer
Excel vba Refreshing all pivot tables in workbook
VBA
0 vote178 views1 answer
Power query M substract minimum value of column -dax
VBA
0 vote178 views1 answer
Vbs expand env var
VBA
0 vote175 views1 answer
Open file dialog in vb.net
VBA
0 vote178 views1 answer
Return na vba
VBA
0 vote204 views1 answer
How to call gcd in vba
VBA
5 votes199 views1 answer
Excel vba get user selected range
VBA
3 votes179 views1 answer
Vba double quote
VBA
0 vote160 views1 answer
Excel VBA web scraping
VBA