/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 vote209 views1 answer
Excel vba cell on change
VBA
0 vote214 views1 answer
Xlbycolumns is not declared
VBA
0 vote217 views1 answer
Vba paste values
VBA
0 vote213 views1 answer
Vba string start with
VBA
0 vote219 views1 answer
Convert unix to date vba
VBA
0 vote205 views1 answer
Do while not vb.net
VBA
0 vote168 views1 answer
Vba set vs dim
VBA
3 votes207 views1 answer
Excel vba last row in range
VBA
0 vote207 views1 answer
Vbnet find highest value in chart
VBA
0 vote229 views1 answer
Find if year is leap year vb
VBA