In dem folgenden Beispiel wird eine Variable auf den Wert der Criteria2-Eigenschaft des Filters für die erste Spalte in dem gefilterten Bereich im Tabellenblatt "Crew" festgelegt.
With Worksheets("Crew") If .AutoFilterMode Then With .AutoFilter.Filters(1) If .On And .Operator Then c2 = .Criteria2 Else c2 = "Not set" End If End With End If End With