VLookup Error
Leon
leider funzt mein code mit VLookup nicht,
würde mich um Korrekturvorschläge sehr freuen:
Function create_x(zahl) As String
Dim a As Long
Dim x As String
a = Worksheets(1).VLookup(zahl, Worksheets(1).Range("A:H"), 8, False)
x = CStr(a)
create_x = x
End Function