Liczbę dziesiętną można wyświetlić w postaci heksadecymalnej (szesnastkowej) za pomocą funkcji:
=Hex(lngLiczba)
Postać szesnastkową liczby można zamienić na jej wartość dziesiętną, za pomocą następującej funkcji:
'Sposób 1. 'Podał Raphael Posmyk (raphael.posmyk@komm-kontroll.de)Function Hex2Dec&(strHex$) Dim strC$'-- ZnakDim intA%'-- Wartosc znakuDim lngS&'-- SumaWhile Len(strHex) > 0 strC = Left(strHex, 1) If IsNumeric(strC) Then intA = Val(strC) Else intA = Asc(UCase(strC)) - 55 End If lngS = lngS + (intA * 16 ^ (Len(strHex) - 1)) strHex = Right(strHex, Len(strHex) - 1) Wend Hex2Dec = lngS End Function'Sposób 2 (!!!). 'Podał Krzysztof Naworyta (k.naworyta@datacomp.com.pl)=CLng("&H" & TwojHex)'(Trudno nie zgodzić się z komentarzem Krzysztofa Czyryło, że 'prostota tego rozwiązania jest urzekająca.)
Oto przykłady użycia wymienionych funkcji:
=Hex(234)'zwraca string EA=Hex2Dec("EA")'lub=CLng("&H" & "EA")'zwraca liczbę 234