/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

20 votes556 views1 answer
Excel vba factorial
VBA
0 vote237 views1 answer
Excel vba formatconditions range
VBA
0 vote224 views2 answers
Excel vba copy paste after last row
VBA
5 votes271 views1 answer
Excel vba how to unit test vba code
VBA
3 votes242 views1 answer
Vba make long from two words
VBA
0 vote225 views1 answer
Excel vba address not absolute
VBA
0 vote230 views1 answer
Vb net dgv doesn't keep currency format
VBA
0 vote250 views1 answer
Vba html document reference
VBA
1 vote245 views1 answer
How to remove zeros in excel
VBA
0 vote255 views1 answer
Vba integer to double
VBA