Dezimalzahl in Hexzahl

Sprache / Programm: Access ab Version 2000

Beschreibung

Die eingebauten Funktionen Hex() und Hex$() in Access haben für die Verwendung in Abfragen einen Nachteil: Sowohl bei leeren Feldern (NULL enthalten) als auch bei Werten, die keine Dezimalzahl darstellen (wenn der Felddatentyp beispielsweise Text ist) gibt die Abfrage einen Fehler aus statt eine Ergebnistabelle zu liefern.

Diese Funtion vermeidet das Problem.

VBA-Quelltext

Public Function Dec2Hex(ByVal DezZahl)
If IsNull(DezZahl) Then Exit Function
If Not IsNumeric(DezZahl) Then Exit Function
Dec2Hex = Hex$(DezZahl)
End Function

Argumente der Funktion/Prozedur

DezZahl: Zahl in numerischem Format oder als String ohne Typkennzeichner wie 0x, 0h oder h

Rückgabewert

Hexzahl als String