Excel VBA Saving autofilter settings with dates

Question

I have a part of a macro that stores the autofilter settings before clearing the filter, so it can reapply them later. The code is as follows:

Dim FilterArray()
         


        

Answer 1

I've amended your code and it runs now well also with dates in my Excel 2013:

' .Criteria1/2 are read as strings with local decimal separator
' but for re-setting Criteria1/2 should be in American format ...
' so replace local decimal separator by dot - this seems to apply also for dates, 
' because dates are also transformed internally to decimal numbers
FilterArray(f, 1) = Replace(.Criteria1, Application.International(xlDecimalSeparator), ".")

(similar for .Criteria2)

Regarding your secondary question: see code example in this post: In Excel VBA, how do I save / restore a user-defined filter?