/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 vote151 views1 answer
Excel vba move down to next visible cell
VBA
1 vote123 views1 answer
Excel vba get ordinal number from cardinal number
VBA
3 votes128 views1 answer
Excel vba get the workbook full file name with path
VBA
8 votes148 views1 answer
Excel vba make integer
VBA
0 vote177 views1 answer
Excel vba delete columns in range
VBA
0 vote115 views1 answer
Vbnet display all axis labels in cahrt
VBA
0 vote125 views1 answer
Excel vba center userform
VBA
0 vote139 views1 answer
Vb run command
VBA
0 vote130 views1 answer
VB get external IP address
VBA
0 vote137 views1 answer
Show unix time in vba
VBA