excel - MS Excel VBA - 按日期过滤(不包括整年)

Question

我正在寻找能够包含列中除整年(2016 年)之外的所有日期的代码

GRBReportSheet.Range("A" & IHRISFILTERFR & ":L" & IHRISFILTERLR).AutoFilter Field:=4, Operator:= _
xlFilterValues, Criteria2:=Array(0, "12/31/2016")       'Filter by Start Date within 2016

以下代码正在过滤我的报告中 2016 年的所有实例，但在后续部分中，我想按 2016 年以外的所有日期进行过滤。我知道何时使用我会使用的其他项目进行过滤:

Criteria2:=">< Something"

不知道如何在日期数组中使用它。非常感谢您的宝贵时间!!

Answer 1

您可以在自动过滤中使用两个条件:

.AutoFilter Field:=1, 
  Criteria1:="<01/01/16", 
  Operator:=xlOr, 
  Criteria2:=">12/31/16"

这是一个使用示例 - 可能需要调整以适应您的情况:

Sheet1.Range("A1").AutoFilter Field:=1, Criteria1:="<01/01/16", Operator:=xlOr, Criteria2:=">12/31/16"