kann man den Autofilter an einer anderern Stelle bzw. in einem anderen Tabellenblatt darstellen?
Schöne Grüße
Thomas
Sub Tab2Filtern()
If Worksheets("Tabelle2").AutoFilterMode = True Then
Worksheets("Tabelle2").AutoFilterMode = False
End If
With Worksheets("Tabelle2").Range("A1").CurrentRegion
.AutoFilter Field:=3, Criteria1:=Tabelle1.Range("C3").Value
.AutoFilter Field:=4, Criteria1:=Tabelle1.Range("B3").Value
End With
End Sub
Ist nun einmal als Beispiel gedacht - wichtig ist v.a., dass Deine Datentabelle (Tabellenblatt 2) auch im echten Zustand keine Leerzeilen/-spalten enthält; sonst greift das "CurrentRegion" falsch, dann muss ein anderer Code her.