Vba low word from Long Integer

'If n is a 4-byte Long Integer, the Low (Left) Word is:
If n And &H8000& Then
  	LoWord = n Or &HFFFF0000
Else
    LoWord = n And &HFFFF&
End If

'If n is a 4-byte Long Integer, the High (Right) Word is:
HiWord = (n And &HFFFF0000) \ &H10000

Source: academy.excelhero.com

Similar codes

0 vote164 views1 answer
Excel vba disable screen update
VBA
0 vote190 views1 answer
Method showalldata of object _worksheet failed vba
VBA
1 vote130 views1 answer
Vba Remove Case Sensitivity
VBA
0 vote169 views1 answer
Vbnet get file name from path
VBA
0 vote173 views2 answers
Get excel file from email attachment in vba
VBA
0 vote178 views1 answer
Openfiledialog specific folder
VBA
0 vote183 views1 answer
Vba remove last vbcrlf
VBA
0 vote185 views1 answer
COMO GRAVAR U VALOR NO ARQUIVO APPSETINGS EM VB NET
VBA
0 vote193 views1 answer
Vba code to select image in sheet
VBA
0 vote185 views1 answer
Vba loop through textboxes
VBA