hab ein kleines Problem
-mit folgendem Code wird: der UserName / UserNr. des jeweiligen Anwenders nach "A16" geschrieben;
-dann sverweis mit "A16" in einer anderen Datei (Mappe1) wird nach "B16" geschrieben;
-mit dem ergebnis aus sverweis (B16) wird nun in Spalte A gefiltert.
soweit so gut
Sub UserNameSverweisAutofilter()
Range("A16").Value = Application.UserName
With Range("B16")
.Formula = "=VLookup(" & Range("A16") & "," & _
"'C:\Dateipfad\[Mappe1.xls]Tabelle2'!A3:D12, 4, False)"
.Formula = .Value
End With
Range("A3").CurrentRegion.AutoFilter _
Field:=1, Criteria1:=Range("B16").Value, Operator:=xlAnd
End Sub
nur wenn der UserName keine Nr. (z.B. 46822) sondern ein Name (Müller) ist, dann klappt der sverweis nicht mehr und schreibt in B16 die Fehlermeldung #Name.
woran könnte das liegen, weiß jemand Rat?
gruss
alex