«Сложенные» расширенные фильтры Excel

Question

Есть ли способ реализовать расширенный фильтр, который бы действовал подобно следующей логике, показанной на скриншоте ниже? (выделенные ячейки представляют желаемую логику)

Answer 1

Option Explicit

Public Sub StackedFilter()

    Dim a As Variant, b As Variant, c As Variant

    a = Array("A", "B", "C")
    b = Array("D", "E", "F")
    c = Array("G", "H", "I")

    With ActiveSheet.UsedRange
        .AutoFilter Field:=1, Criteria1:=a, Operator:=xlFilterValues  'Col A filter
        .AutoFilter Field:=2, Criteria1:=b, Operator:=xlFilterValues  'Col A And B
        .AutoFilter Field:=3, Criteria1:=c, Operator:=xlFilterValues  'Col A And B And C
    End With
End Sub