Question

问题：我可以按Criteria1进行过滤，但Criteria2我只想按Criteria1过滤89天以上的过滤。

代码：

  Sub Reset_Table()
    '
    ' Reset_Table Macro
    '
        ActiveSheet.Range("$B$39:$I$14625").AutoFilter Field:=5, Criteria1:=Array( _
            "First namefilter", "Somethingelse", _

    Operator:=xlFilterValues

            'Over 90 days

               ActiveSheet.Range("$B$39:$I$14625").AutoFilter Field:=6, Criteria2:=Array(">89"), Operator:=xlFilterValues                  
    End Sub

Answer 1

使用AutoFilter Method时，Criteria2仅在您同时将两个标准应用于同一字段时使用。字段6上的第二个过滤器应该是另一个Criteria1。

with worksheets("Sheet1")
    if .autofiltermode then .autofiltermode = false
    with .Range("$B$39:$I$14625")
        .AutoFilter Field:=5, Criteria1:=Array("First namefilter", "Somethingelse", "everything"), Operator:=xlFilterValues
        .AutoFilter Field:=6, Criteria1:=">89"
    end with
end with

Excel宏过滤超过x天

1 个答案: