Flip the Sort Order in Pivot Tables

I have a worksheet with several pivot tables. Is there a way to loop through the pivot tables and flip the sort order without knowing the names of the pivot tables and the fields they are sorted by? And for that matter, the sort order?

If one of the Pivot tables is sorted in ascending order by the Date field, when this VBA runs, it would still be sorted by the Date field but in Descending order. This would be repeated for all pivot tables in the worksheet.

I'm using Excel 2010.

Thank you in advance,

Gorilla