der nachfolgende Code funktioniert nicht so wie er soll (Es werden keine Datensätze angezeigt).
With ws1.Range("D2")
If name "" Then
.AutoFilter Field:=2, Criteria1:="name", Operator:=xlAnd, Criteria2:="name2"
End If
End With
name = Buchstabe von a-z + A-Z, name2="*" = Platzhalter (Wert wurde so gedimt)
Für Hilfe wäre ich dankbar.
Gruß Artur