使用一个自动过滤器

Question

我试图过滤一系列日期，同时忽略包含＆＃34; 0000-00-00＆＃34;

的空白和单元格

如果需要，我可以发布整个代码，但这是我遇到问题的片段。

Set ComboRange = .Range(.Cells(1, 1), .Cells(lcRow, lcColumn))
ComboRange.AutoFilter Field:=6, Criteria1:= _
    "<=" & Finish, Operator:=xlOr, Criteria2:=Array("0000-00-00", "=")

在我的代码中，lcRow和lcColumn只表示最后一行和一列。完成是例如6/30/16的日期。我的问题是这是删除包含＆＃34; 0000-00-00＆＃34;的数据。我试过将我的运算符更改为xlAnd和xlFilterValues，但都没有工作。谢谢你的帮助！

Answer 1

这应该有效：

ComboRange.AutoFilter Field:=6, Criteria1:= Array("0, " & Finish), _ 
    Operator:=xlFilterValues, Criteria2:=Array("0000-00-00", "=")

第一个数组中的0表示大于或等于。