Ich habe folgendes Test-Macro geschrieben:
Sub testhex()
Dim myString As String
Dim resultString As String
Dim decValue As Integer
Dim mylength As Integer
myString = "852549 "
resultString = Trim(Replace(myString, Hex(202), ""))
mylength = Len(resultString)
decValue = Asc(Mid(resultString, mylength, 1))
Debug.Print decValue
End Sub
Als Resultat sagt mir Debug Print, dass dort ein HEX(202) steht ?Was läuft da falsch ?