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 vote148 views1 answer
COMO GRAVAR U VALOR NO ARQUIVO APPSETINGS EM VB NET
VBA
0 vote153 views1 answer
Vba boolean to string
VBA
0 vote143 views1 answer
Vba len variant
VBA
31 votes265 views1 answer
Excel-vba how to convert a column number into an excel column
VBA
1 vote149 views1 answer
Excel vba to lower case
VBA
0 vote158 views1 answer
Convert Seconds to HH:MM:SS in VB.Net
VBA
0 vote153 views1 answer
Vba find last column in a row with data
VBA
1 vote152 views1 answer
Random number generator vb.net
VBA
0 vote152 views1 answer
Excel vba saveas no prompt for overwrite
VBA
0 vote147 views1 answer
Vba DisplayGridlines
VBA