/VBA/Excel vba left word from Long Integer

Excel vba left 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 vote153 views1 answer
Excel VBA web scraping
VBA
0 vote160 views1 answer
Vba nested dictionary
VBA
0 vote177 views1 answer
Find if year is leap year vb
VBA
3 votes152 views1 answer
Vba folderexists
VBA
0 vote192 views1 answer
Visual basic run command
VBA
0 vote117 views1 answer
Vba code to remove leading and trailing spaces
VBA
1 vote149 views1 answer
Excel format cell as kilowatts
VBA
0 vote183 views1 answer
Vba multiple optional arguments
VBA
5 votes172 views1 answer
Xlvba double quotes in string literal
VBA
0 vote179 views1 answer
Excel vba protect shapes
VBA