/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 vote281 views1 answer
Excel vba formatconditions positive
VBA
0 vote303 views1 answer
Excel vba protect sheet
VBA
31 votes395 views1 answer
Excel vba function to convert column number to letter
VBA
0 vote291 views1 answer
Average vba
VBA
0 vote295 views1 answer
Excel vba calculate
VBA
0 vote243 views1 answer
How to make a if statement with vbs
VBA
0 vote297 views1 answer
Loop through lines in text file vb net
VBA
0 vote307 views1 answer
Vbnet check if string is only letters
VBA
22 votes399 views1 answer
Excelvba check for directory
VBA
0 vote284 views1 answer
Change form background image vb
VBA