根据今天的date和之后过滤数据

我的数据可以追溯到2010年,并持续到2029年。我想要创build一个只包括今天的date和转发数据的macros。

我把下面的macroslogging下来,排除所有的date直到今天,希望它能给我一个开始的好地方,但我还是很迷茫。

为了使它更复杂,我没有每一个可用的date,所以今天使用一个variables不会总是工作。 所以我想我需要macros在今天的date之前排除一切。

感谢您的帮助,我真的迷失了,需要很多。

Sub Macro1() Sheets("Consulta_Lastro").Range("$B$4:$T$9047").AutoFilter Field:=4, Operator:= _ xlFilterValues, Criteria2:=Array(0, "7/10/2029", 0, "12/20/2028", 0, "12/20/2027", _ 0, "12/20/2026", 0, "12/20/2025", 0, "12/20/2024", 0, "12/20/2023", 0, "12/20/2022", 0, _ "12/20/2021", 0, "12/22/2020", 0, "12/22/2019", 0, "12/30/2018", 0, "12/30/2017", 0, _ "12/30/2016", 1, "2/28/2015", 1, "3/31/2015", 1, "4/30/2015", 1, "5/30/2015", 1, _ "6/30/2015", 1, "7/31/2015", 1, "8/31/2015", 1, "9/30/2015", 1, "10/30/2015", 1, _ "11/30/2015", 1, "12/30/2015") End Sub 

尝试这个:

 Sheets("Consulta_Lastro").Range("$B$4:$T$9047").AutoFilter _ Field:=4, Criteria1:=">=" & Date 

这只会显示date大于或等于今天的date。 HTH。