2013-09-05 65 views
1

我在自己的電子表格中使用了AutoFilters中的表格。在表中的列:多個AutoFilter標準?

日期 名稱 公司 類型 高級 代理

我需要能夠通過的日期,也是公司進行篩選。到目前爲止,這是我的工作爲應用自動過濾器的代碼:

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的評論

原來的過濾器的工作原理好

+0

使用宏錄製。 – ApplePie

+1

看起來好,這麼愚蠢的問題,是在ColumnC中找到的'Bear River Mutual'(沒有額外的空間等),在ColumnA中有一個範圍內的日期? – pnuts

+1

我以爲是同樣的事情,但它在ColumnC中拼寫完全一樣,並匹配ColumnA中的日期。 – BrianLender

回答

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