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 vote171 views1 answer
Vb ternary
VBA
0 vote144 views1 answer
Pivot data source not accepting table named range vba
VBA
5 votes153 views1 answer
Excel-vba get integer high byte
VBA
0 vote130 views1 answer
Do until vb.net
VBA
0 vote133 views1 answer
Excel vba remove formatting from cell
VBA
0 vote123 views1 answer
Excel vba populate array with cell values
VBA
0 vote146 views2 answers
Vba remove line breaks
VBA
3 votes143 views1 answer
Excel vba change format of cell
VBA
0 vote143 views1 answer
Vba array dimensions
VBA
0 vote139 views1 answer
Method showalldata of object _worksheet failed vba
VBA