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

5 votes231 views1 answer
Excel vba tool to help with refactoring code
VBA
0 vote218 views1 answer
Add Formula to Shape Text in VBA
VBA
0 vote228 views1 answer
Vbs
VBA
0 vote239 views1 answer
Loop through all text boxes in a form vb
VBA
5 votes245 views1 answer
Excel vba left word from Long Integer
VBA
0 vote260 views1 answer
Style percent not found vba
VBA
1 vote232 views1 answer
How to INPUT text in shape with enter and spacein vba
VBA
0 vote240 views1 answer
Faire appel à la mise en forme conditionnelle vba excel
VBA
0 vote234 views1 answer
Vbnet find highest value in chart
VBA
0 vote243 views1 answer
Excel vba combine ranges
VBA