Excel und VBA: Formeln, Programmierung, Lösungen

StandardModule: Modul1

Sub AlleFiltern()
   Dim iWks As Integer
   For iWks = 2 To Worksheets.Count
      Worksheets(iWks).Range("A1").AutoFilter _
         Field:=1, _
         Criteria1:="=Zeile1*", _
         Operator:=xlAnd
    Next iWks
End Sub

    

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Autofilter