/VBA/Excel vba convert 2 Short integers to a Long integer

Excel vba convert 2 Short integers to a Long integer

Excel 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

Excel vba convert 2 Short integers to a Long integer

Public Function MakeLong&(ByVal LoWord%, ByVal HiWord%)
  MakeLong = (HiWord * &H10000) Or (LoWord And &HFFFF&)
End Function

Similar codes

0 vote259 views1 answer
Vbscript check if string contains
VBA
0 vote264 views1 answer
Vbnet check if string is only letters
VBA
0 vote226 views1 answer
Excel vba join variant array
VBA
0 vote232 views1 answer
Vba find sub dictionary
VBA
0 vote287 views1 answer
How to call gcd in vba
VBA
1 vote230 views1 answer
Vba declare api 64 bit 32 bit
VBA
0 vote242 views1 answer
Vba test optional argument
VBA
0 vote245 views1 answer
Vbnet convert charatcer to binary
VBA
0 vote267 views1 answer
Vba DisplayGridlines
VBA
0 vote236 views1 answer
Excel PasteSpecial Format:= can't find the argument
VBA