Vba low 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 vote227 views1 answer
How to self delete a vbscript file
VBA
0 vote263 views1 answer
Vba sort multiple columns
VBA
1 vote244 views1 answer
Add rows to datagridview vb.net
VBA
0 vote242 views1 answer
Pivot data source not accepting table named range vba
VBA
0 vote231 views1 answer
Excel vba calculate
VBA
15 votes475 views1 answer
Excel vba wait
VBA
1 vote185 views1 answer
Vba Remove Case Sensitivity
VBA
0 vote221 views1 answer
Vbnet display all axis labels in cahrt
VBA
0 vote234 views1 answer
Vba first cell in range
VBA
1 vote236 views1 answer
Vba date to unix timestamp
VBA