Filter set in macro filters all values out

P

PVD Wales

The following small macro results in no rows showing in the auto filtered
table. If I open the custom the filter dialog then click on OK the expected
rows are shown. I am using excel 2003.
Any ideas?

Sub Due14()
'

' filter for next status change due in next 14 days
'
B4next$ = "<" + Format(Now() + 14, "short date")
Selection.AutoFilter Field:=17, Criteria1:=B4next$

End Sub
 
J

Joel

the criteria need to be a serial date try this change. You don't need a
string date.


Sub Due14()
'

' filter for next status change due in next 14 days
'
B4next$ = "<" & (Now() + 14)
Selection.AutoFilter Field:=17, Criteria1:=B4next$

End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top