/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 vote318 views1 answer
Vba ternary
VBA
8 votes380 views1 answer
Vba make a short integer from two bytes
VBA
1 vote299 views1 answer
VBA Loop through recordset
VBA
1 vote286 views1 answer
Sort using vba
VBA
0 vote357 views1 answer
Excel vba delete columns in range
VBA
0 vote324 views1 answer
Vbnet round to nearnest thousand
VBA
0 vote296 views1 answer
Power query M substract minimum value of column -dax
VBA
7 votes313 views1 answer
Vba array declaration
VBA
0 vote279 views2 answers
Excel vba prevent save
VBA
0 vote312 views1 answer
Vba keep command window open
VBA