/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 vote325 views1 answer
Rotate image by any angle vb.net
VBA
0 vote311 views1 answer
Vba like with wildcard
VBA
0 vote301 views1 answer
Vbnet display all axis labels in cahrt
VBA
0 vote318 views1 answer
Excel vba chrw max value
VBA
0 vote334 views1 answer
Iterate all file in a folder vba
VBA
0 vote304 views1 answer
Vba sheet visible
VBA
3 votes322 views1 answer
Vba http request json
VBA
0 vote347 views1 answer
Excel web scraping
VBA
5 votes362 views1 answer
Excel-vba get integer high byte
VBA
0 vote301 views1 answer
Hello world vb.net
VBA