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

0 vote334 views1 answer
Convert unix to date vba
VBA
0 vote369 views1 answer
Excel vba protect shapes
VBA
5 votes379 views1 answer
Excel vba right word from Long Integer
VBA
0 vote328 views1 answer
Vba sheet visible
VBA
1 vote342 views1 answer
Excel format cell as kilowatts
VBA
0 vote330 views1 answer
Excel vba extract year
VBA
0 vote333 views1 answer
Handling a click event anywhere inside a panel vb
VBA
0 vote363 views1 answer
Tester si une case est vide vba
VBA
5 votes389 views1 answer
Excel-vba get integer high byte
VBA
0 vote350 views1 answer
Get current year vb
VBA