/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

1 vote140 views1 answer
Excel vba get ordinal number from cardinal number
VBA
0 vote145 views1 answer
How to use if condition in time vba
VBA
0 vote147 views1 answer
Excel vba prevent saving workbook
VBA
31 votes273 views1 answer
Vba how to convert a column number into an Excel column
VBA
0 vote135 views1 answer
Vba word pdf table to excel
VBA
0 vote181 views1 answer
Check if cell is dbnullvb.net
VBA
0 vote137 views1 answer
Le contrôle SpinButton (Toupie)
VBA
0 vote150 views1 answer
Vba boolean to string
VBA
0 vote147 views1 answer
Excel vba Column Name from Column Number
VBA
0 vote152 views1 answer
Putting marquee in vb.net
VBA