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 vote234 views1 answer
Excel vba make cell visible
VBA
0 vote211 views1 answer
Enter into cells data grid view
VBA
0 vote264 views1 answer
Winforms dark title bar
VBA
0 vote238 views1 answer
Excel vba saveas no prompt for overwrite
VBA
0 vote223 views1 answer
Vba code to open a file with login rights
VBA
2 votes236 views1 answer
Vba split string
VBA
0 vote242 views1 answer
Dynamic array vba
VBA
0 vote235 views1 answer
Excel vba protect content
VBA
22 votes303 views1 answer
Excel vba check if directory exists
VBA
2 votes222 views1 answer
Excel vba extract file name
VBA