/VBA/Excel vba left word from Long Integer

Excel vba left 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 vote247 views1 answer
Vba round to 2 decimals
VBA
22 votes313 views1 answer
Excelvba check for directory
VBA
0 vote245 views1 answer
Vba excel do not recalculate before save
VBA
1 vote245 views1 answer
Random number generator vb.net
VBA
5 votes190 views1 answer
Vba array worksheet.index
VBA
0 vote243 views1 answer
Excel vba chrw max value
VBA
0 vote239 views1 answer
Telephon call in vba
VBA
0 vote249 views1 answer
Faire appel à la mise en forme conditionnelle vba excel
VBA
5 votes249 views1 answer
Excel vba highlight cells using the hex color value within the cells
VBA
1 vote254 views1 answer
VBA Loop through recordset
VBA