mal wieder das Problem Fehler 9 "Index außerhalb des Bereichs" in der letzten Zeile - ich find es einfach nicht!!
Hier die anonymisierte Tabelle:
https://www.herber.de/bbs/user/153595.xlsm
Sub Filter_Für_Service()
ActiveSheet.ListObjects("Tabelle2").Range.AutoFilter Field:=3, Criteria1:= _
"Service"
ActiveSheet.ListObjects("Tabelle2").Range.AutoFilter Field:=2, _
Criteria1:="
Herzlichen Dank im VorausMargarete