/VBA/Excel vba right word from Long Integer

Excel vba right 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 vote245 views1 answer
For each item in folder outlook vba
VBA
1 vote242 views1 answer
Sort using vba
VBA
0 vote260 views1 answer
Vba cell all borders
VBA
0 vote261 views1 answer
Excel vba round to whole number
VBA
1 vote230 views1 answer
Excel vba to lower case
VBA
2 votes218 views1 answer
Date format for ms chart vb.net
VBA
0 vote248 views1 answer
Find database connection string vb
VBA
0 vote221 views1 answer
How to convert weeks to days into textbox with VB site:stackoverflow.com
VBA
0 vote218 views1 answer
How to use if condition in time vba
VBA
0 vote243 views1 answer
Columns dont autoresize on program start vb.net
VBA