/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
Vbnet get file name from path
VBA
0 vote218 views1 answer
Get current url vb.net
VBA
0 vote236 views1 answer
Vba sheet hide unhide
VBA
0 vote237 views1 answer
Excel vba combine ranges
VBA
0 vote229 views1 answer
How to get the value of optionbutton in vba
VBA
0 vote228 views1 answer
Convert Seconds to HH:MM:SS in VB.Net
VBA
2 votes166 views2 answers
Vba exit loop
VBA
1 vote224 views1 answer
Vba refresh pivot table
VBA
0 vote234 views1 answer
Excel last used row
VBA
0 vote243 views1 answer
Visual stuiod not recognising desgined labels
VBA