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 vote351 views1 answer
Vba type
VBA
0 vote335 views1 answer
Windows Presentation Foundation dark title bar
VBA
0 vote367 views1 answer
Excel vba protect worksheet without password
VBA
5 votes387 views1 answer
Excel vba right word from Long Integer
VBA
0 vote375 views1 answer
Nested if else in vb.net
VBA
0 vote355 views1 answer
Internet explorer reference vba
VBA
0 vote338 views1 answer
Vba first line of string
VBA
7 votes371 views1 answer
Vba array declaration
VBA
15 votes497 views1 answer
Excel vba wait
VBA
1 vote370 views1 answer
Excel vba to lower case
VBA