/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 vote189 views1 answer
Vbnet check if sting contians symbols
VBA
4 votes179 views1 answer
Excel vba determine number of elements in an array
VBA
1 vote201 views1 answer
Extract the second word in a text in excel
VBA
0 vote177 views1 answer
Enter into cells data grid view
VBA
0 vote182 views1 answer
Vba get workbook name
VBA
0 vote197 views1 answer
Thread sleep vb
VBA
1 vote184 views1 answer
Vba date to unix timestamp
VBA
0 vote194 views1 answer
COMO GRAVAR U VALOR NO ARQUIVO APPSETINGS EM VB NET
VBA
0 vote197 views1 answer
Regex numeric digits
VBA
0 vote193 views1 answer
Excel vba combine ranges
VBA