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 vote121 views1 answer
Vbnet click on dgv cells
VBA
3 votes114 views1 answer
Excel vba read registry key value
VBA
0 vote121 views1 answer
Vba verticalalignment
VBA
0 vote115 views1 answer
Excel vba copy entire sheet paste values
VBA
0 vote131 views1 answer
Winforms dark title bar
VBA
0 vote125 views1 answer
Vbnet round to nearnest thousand
VBA
0 vote121 views1 answer
Vba sheet visible
VBA
1 vote117 views1 answer
Vba delete file
VBA
0 vote108 views1 answer
Vba argument is set
VBA
0 vote117 views1 answer
Excel vba hide columns
VBA