/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 vote123 views1 answer
Vbnet check if number is even or odd
VBA
2 votes126 views1 answer
Vba ado ace sql alias ignored for calculated column
VBA
0 vote116 views1 answer
Vba len variant
VBA
0 vote119 views1 answer
Vbscript for loop
VBA
0 vote129 views1 answer
Label de tableau dans des label.text en VBA
VBA
0 vote127 views1 answer
Windows Forms dark title bar
VBA
0 vote119 views1 answer
Vba first line of string
VBA
0 vote117 views2 answers
Get excel file from email attachment in vba
VBA
31 votes244 views1 answer
Excel vba function to convert column number to letter
VBA
31 votes242 views1 answer
Vba how to convert a column number into an Excel column
VBA