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 vote295 views1 answer
Excel vba concatenate range
VBA
0 vote306 views1 answer
Vb.net round to 2 decimal places
VBA
2 votes313 views1 answer
Excel vba extract file name
VBA
0 vote322 views1 answer
Set column width of datagridview vb.net
VBA
0 vote348 views2 answers
Get unique random number in vb.net
VBA
0 vote336 views1 answer
Vba loop through textboxes
VBA
0 vote333 views1 answer
VB get external IP address
VBA
3 votes370 views1 answer
Vba continue for each loop
VBA
0 vote334 views1 answer
Vbnet chart make 0 gridline line different color
VBA
0 vote286 views1 answer
Vba set vs dim
VBA