Hi,

I have a set of pivot tables which are being updated by cell the date in
cell B1 using the following code:

ActiveSheet.PivotTables("PivotTable1").PivotFields ("Invoice
Month").CurrentPage = ActiveSheet.Range("B1").Value

At last this is working :) However... the dates are being inserted into the
pivot tables as new selections in US date format instead of selecting an
existing UK date format from the data choices. I do not understand this as
all source data is in UK date format, cell B1 is in UK date format, the pivot
field is also in UK date format, so why does this do this?

I appreciate someones help!!!