Hex Function
αααα‘ααβααααβα’ααααβαα½α αααβααααΆαβα²ααβαααααβαααβαααβααααΆαβαα½αβααβα ααα½αβαα½αΒ α
ααΆαααβααααααα α
Hex (Number)
αααααβαααα‘αα α
ααααβα’αααα
αααΆαααΆαααααα α
α ααα½α α ααααααβαααβαα½αβα ααα½α αααβα’αααβα ααβααααααβαα βααΆβα ααα½αβαααβαααβααααΆαβαα½αΒ α
α§ααΆα ααα α
Sub ExampleHex
REM uses BasicFormulas in $[officename] Calc
Dim a2, b2, c2 As String
a2 = "&H3E8"
b2 = Hex2Int(a2)
MsgBox b2
c2 = Int2Hex(b2)
MsgBox c2
End Sub
Function Hex2Int( sHex As String ) As Long
REM Returns a Long-Integer from a hexadecimal value.
Hex2Int = clng( sHex )
End Function
Function Int2Hex( iLong As Long) As String
REM Calculates a hexadecimal value in Integer.
Int2Hex = "&H" & Hex( iLong )
End Function