/VBA/Excel vba low word from Long Integer

Excel 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

1 vote185 views1 answer
Excel vba to lower case
VBA
0 vote177 views1 answer
Excel vba saveas no prompt for overwrite
VBA
8 votes198 views1 answer
Excel vba determine number of elements in a 2D array
VBA
0 vote165 views1 answer
Add items to combobox vb.net
VBA
0 vote229 views1 answer
Application.ExecutablePath VB.NET
VBA
0 vote203 views1 answer
Vba registry settings
VBA
0 vote177 views1 answer
How to carry text to the next line in a label in vb.net
VBA
1 vote178 views1 answer
Add a index column power bi
VBA
3 votes180 views1 answer
Extract the nth word from a text string
VBA
5 votes197 views1 answer
Excel vba last byte from INTEGER
VBA