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 vote192 views1 answer
Remove frist letter from string vbnet
VBA
0 vote210 views1 answer
Vba file chooser
VBA
-1 vote208 views2 answers
How close excel through visual basic
VBA
4 votes226 views1 answer
Excel vba Imitating the "IN" operator from python
VBA
2 votes194 views2 answers
Constructor vb.net
VBA
1 vote198 views2 answers
Vba remove first 2 characters from string
VBA
0 vote202 views1 answer
Get current year vb
VBA
0 vote251 views1 answer
Vbnet add axis labels to chart
VBA
0 vote225 views1 answer
Vba copy file
VBA
1 vote216 views1 answer
Excel vba autofit
VBA