Date AutoFilter Not Working

Some problems:

1. You are building the date from dDate, which is an unset variable instead of Date, which is a function that returns the system date.
2. You should add CLng() around dDate to ensure it is coerced to long integer format (and it shows more clearly what you are aiming to do)
3. The function DateSerial is being used the wrong way round. It should be DateSerial(Year,Month,Day)
4. (optional) You can just go straight to lDate = CLng(Date) since VBA will convert the system date format to long integer using the system date format.
5. You are passing the criteria as a string, and using dDate instead of lDate


Implementing the changes should fix the code:

Please Login or Register  to view this content.

Hi,

If you are using a Long variable, you can skip a conversion by using CLng instead of CDbl.

Oops, nice catch nitwit. My mistake. I have edited my code above.