/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

1 vote349 views1 answer
Close form vba
VBA
0 vote383 views4 answers
Jwt token vb.net validation
VBA
0 vote382 views1 answer
How to convert weeks to days into textbox with VB site:stackoverflow.com
VBA
0 vote360 views1 answer
Excel run macro every 5 minutes
VBA
1 vote365 views1 answer
Vba reverse string
VBA
27 votes515 views2 answers
Vba check if file exists
VBA
0 vote380 views1 answer
Selecttoken em vbnet e json
VBA
3 votes393 views1 answer
Excel insert blank row for value change in column
VBA
0 vote364 views1 answer
Vbnet line graph smooth lines
VBA
0 vote382 views1 answer
How to add line graph vb net
VBA