I have a pivot table that is fed off a dynamic named range. This named range
has 6 fields left to right. The first field is a Data field. Therea are
roughly 100 rows of data. I have a macro that apends new data to the sheet
with the dynamic named range. As my data is not entered in data
chronological order, I had to click on the date column field of the table and
right click:

Field Settings\Advanced and under Auto Sort Options, I had to click off
"Ascending". So the pivot table sorts it.

What I have noticed is that when I append new data to the dynamic range, if
this new data does not have date formats, the pivot table will not
automatically update with the ascending sorted data columns. The data in the
DATA Field updates, but the Order of the dates in the Column Fields do not.
The new dates simply get tacked onto the end of the pivot table so I get
dates that look like this:

12/2001 12/2002 12/2003 12/2001 12/2002 12/2003

So I have to ensure that all the apended data in the date column have date
formats. Is there a setting I need to trigger in VBA to ensure this. Or
will I have to rely on a macro to check formats and edit as needed?

Thanks