Hi, du musst hexval eine Stringvariable übergeben...

Dim Hexweert As String*10
Dim a as long
.....
Hexwert="100167E4A"
a = hexval(Hexwert)
....

sollte laufen...