Mit folgendem Code einer USF möchte ich den Autofilter in einer Tabelle ändern:
Private Sub ListBox1_Click()
Dim w As Worksheet
Dim Filterwahl As String
Set w = Worksheets("Selection")
Filterwahl = ListBox1.Value
w.Range("E1").AutoFilter field:=1, Criteria1:=Filterwahl
End Sub
Der Filterwert ist natürlich vorhanden!
Trotzdem kommt eine Fehlermeldung!
Kann ich abfragen ob ein AutoFilter bereits gesetzt wurde? Wenn ja, wie bitte?
Vielen Dank vorab für die Hilfe!
MfG
Ludwig