/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 vote361 views2 answers
Get unique random number in vb.net
VBA
4 votes344 views2 answers
Vba create folder if not exist
VBA
0 vote324 views1 answer
Vbide vbproject reference
VBA
0 vote387 views1 answer
Regex numeric digits
VBA
0 vote374 views1 answer
Create links in msgbox in vb
VBA
0 vote328 views1 answer
Vbnet display all axis labels in cahrt
VBA
0 vote296 views1 answer
Excel vba linter
VBA
0 vote381 views1 answer
Vba count all row
VBA
0 vote401 views1 answer
Filesystemobject vba reference
VBA
0 vote394 views1 answer
If statement vdhl
VBA