/VBA/Excel vba high word from Long Integer

Excel vba high 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 vote333 views1 answer
Remove first character from string vb
VBA
0 vote355 views1 answer
Return na vba
VBA
4 votes349 views2 answers
Excel vba last column with data
VBA
0 vote349 views1 answer
Arq linux
VBA
1 vote340 views1 answer
Change the first item in a queue vb.net
VBA
0 vote359 views1 answer
Excel vba disable screen update
VBA
1 vote367 views1 answer
Excel vba Populating a combobox on a userform from a range of cells
VBA
0 vote330 views1 answer
Convert Seconds to HH:MM:SS in VB.Net
VBA
0 vote364 views1 answer
Style percent not found vba
VBA
0 vote349 views1 answer
Excel vba round to whole number
VBA