2017-02-25 77 views
2

我要尋找的代碼,就可以包括一列中的所有日期,除了一個enire年(2016)MS Excel的VBA - 過濾通過的日期(不包括在整個一年)

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" 

不知道如何我可以用這在日期數組中。非常感謝您的時間!

回答

2

可以在AutoFilter使用兩個標準:

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

下面是使用的例子 - 可能需要調整,以配合您的情況:

enter image description here

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

甚至沒有考慮一下!謝謝大大 – Ace16150s

+0

**更新,不知道爲什麼,但即使當我嘗試這個在我的數據過濾器不會返回儘管之前有很多條目的東西/上/ 2016試過整列轉換爲日期格式後仍然沒有數據。 – Ace16150s

+0

我更新了我如何使用'AutoFilter'的示例的答案 - 可能需要針對您的情況進行一些調整? –