Vba convert 2 bytes to an integer

Public Function MakeInteger%(LoByte As Byte, HiByte As Byte)
  If HiByte And &H80 Then
    MakeInteger = ((HiByte * &H100&) Or LoByte) Or &HFFFF0000
  Else
    MakeInteger = (HiByte * &H100) Or LoByte
  End If
End Function

Source: academy.excelhero.com

Similar codes

1 vote172 views1 answer
Vba delete file
VBA
6 votes175 views1 answer
Excel vba check if a string only contains alpha characters
VBA
0 vote190 views1 answer
Priavte sub with multiple handels find sneder
VBA
0 vote183 views1 answer
Vb run command
VBA
0 vote166 views1 answer
Excel VBA web scraping
VBA
0 vote174 views1 answer
Nested if else in vb.net
VBA
5 votes195 views1 answer
Excel vba get low byte from INTEGER
VBA
0 vote167 views1 answer
Do while not vb.net
VBA
0 vote178 views2 answers
Vb.net include quotes in string
VBA
25 votes339 views2 answers
Excel vba folder exist
VBA