/VBA/Excel vba high word from Long Integer

Excel vba high 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

-1 vote300 views1 answer
Code for reading letters only in vb 6
VBA
0 vote278 views1 answer
Vbscript check if string is empty
VBA
0 vote267 views1 answer
Excel vba protect content
VBA
0 vote283 views1 answer
Excel VBA web scraping
VBA
0 vote256 views2 answers
Excel vba close without saving
VBA
0 vote281 views2 answers
Get excel file from email attachment in vba
VBA
22 votes384 views1 answer
Excelvba check for directory
VBA
5 votes284 views1 answer
Xl vba double quotes in string literal
VBA
0 vote286 views1 answer
Vba array dimensions
VBA
0 vote274 views1 answer
VBA Sort RossetaCode
VBA