/VBA/Excel vba right word from Long Integer

Excel vba right 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 vote368 views2 answers
Vb.net include quotes in string
VBA
1 vote366 views1 answer
Vb.net get name by Cell Click
VBA
1 vote361 views1 answer
Excel vba Populating a combobox on a userform from a range of cells
VBA
0 vote324 views1 answer
Vb window.minimize
VBA
0 vote329 views1 answer
Vb check if row has column
VBA
0 vote333 views1 answer
Find the name of the last excel sheet vb
VBA
0 vote317 views1 answer
Excel vba populate array with cell values
VBA
0 vote379 views1 answer
Regex numeric digits
VBA
1 vote356 views1 answer
Excel vba to lower case
VBA
0 vote338 views1 answer
Vba sort multiple columns
VBA