1

我的电子表格中有一个与自动筛选器一起使用的表格。表中的列是：

日期 名称 公司类型 高级代理

我需要能够按日期和公司进行过滤。到目前为止，这是我正在使用的用于应用自动过滤器的代码：

With ActiveSheet
    .AutoFilterMode = False
        With .Range("A1:F1")
             .AutoFilter
             .AutoFilter field:=1, Criteria1:=">=" & Me.boxDateBegin.Value, _
             Operator:=xlAnd, Criteria2:="<=" & Me.boxDateEnd.Value
             .AutoFilter field:=3, Criteria1:="Bear River Mutual"
        End With
End With

唯一的问题是这似乎没有应用第二个过滤器（字段：= 3）。我做错什么了吗？

不是由 OP 编辑​​，而是由 OP 的评论编辑

结果过滤器效果很好

4

1 回答 1

0

下面的代码可能会帮助你..

With ActiveSheet .AutoFilterMode = False With .Range("A1:F1") .AutoFilter .AutoFilter field:=1, Operator:=xlFilterValues, Criteria1:=">=" & Me.boxDateBegin.Value, _ Operator:=xlAnd, Criteria2:="<=" & Me.boxDateEnd.Value .AutoFilter field:=3, Criteria1:="Bear River Mutual" End With End With

于 2015-08-03T12:16:55.927 回答