Macro to set Autofilter AFTER today's date

Hi there!

I'm a VBA noob, taking my first steps. I'm unable to figure out how to set Autofilter to filter out the dates after today (but include today's date).

This is my code:

ActiveSheet.Range("$A$1:$AB$10000").AutoFilter Field:=2, Criteria1:=">" & Date, Operator:=xlAnd

This code runs fine but it excludes today's date which I need.

Any help would be appreciated.


Thanks!

Try:

Please Login or Register  to view this content.

Thanks John! Unfortunately it gives me the same data as before.

However, I just tried manually applying Autofilter and saw that Excel takes today's date when applying 'is after' filter, which is strange.

I modified my code to this:

ActiveSheet.Range("$A$1:$AB$10000").AutoFilter Field:=2, Criteria1:=">" & Date + 1, Operator:=xlAnd

and it works perfect! Thanks for your help again!

Hmm. Strange indeed. Code I suggested worked when I tested it. Note Operator xlOr.