/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

3 votes279 views1 answer
Vba not equal
VBA
1 vote267 views1 answer
Excel vba get ordinal number from cardinal number
VBA
3 votes274 views1 answer
Excel vba change format of cell
VBA
0 vote292 views1 answer
How to enter Vbox manage commands
VBA
0 vote259 views1 answer
Vbs
VBA
0 vote278 views1 answer
Vba get relative cell address
VBA
0 vote285 views1 answer
Vba array dimensions
VBA
0 vote264 views1 answer
How to use VBA to add new record in MS Access?
VBA
1 vote292 views1 answer
How to remove zeros in excel
VBA
0 vote275 views2 answers
Delete all controls from list of control vb.net
VBA