Excelmacros单独运行当前月份值的数据filter

任何人都可以帮助我的macros脚本运行数据filter本月date单独。

这应该发生在所有的月份。

———我logging了这个macros – 手动过滤本月的date——

Sub Macro3() ' ' Macro3 Macro ' ' ActiveSheet.ListObjects("Table_owssvr").Range.AutoFilter Field:=5, Operator _ :=xlFilterValues, Criteria2:=Array(1, "11/10/2017") End Sub 

在上面。 “11/10/2017” –而不是今天的date – 如何在Excelmacros解释,以获得从以下列表中的所有十一月date例如:

 9/27/2017 9/29/2017 10/2/2017 11/9/2017 11/10/2017 

按本月过滤

 ActiveSheet.ListObjects("Table_owssvr").Range.AutoFilter Field:=5, Criteria1:=xlFilterThisMonth, Operator:=xlFilterDynamic