Thanks for the reply Izandol.

I've tried not hiding 2014 but it's still crashing when it get to this bit:

ActiveSheet.PivotTables("PivotTable2").PivotFields( _
"[Dates].[PeriodDates].[Day]").VisibleItemsList = Array( _
"[Dates].[PeriodDates].[Day].&[2014-06-08T00:00:00]", _
"[Dates].[PeriodDates].[Day].&[2014-06-09T00:00:00]", _
"[Dates].[PeriodDates].[Day].&[2014-06-10T00:00:00]", _
"[Dates].[PeriodDates].[Day].&[2014-06-11T00:00:00]", _
"[Dates].[PeriodDates].[Day].&[2014-06-12T00:00:00]")

I can get it to hide ever date apart from the ones I need but that means I have to define each date individually apart from the ones I need filtered. It’s really bugging me that if I can do that why can’t I just ask it to make them visible and define only the items I needI can get it to hide ever date apart from the ones I need but that means I have to define each date individually apart from the ones I need filtered. It’s really bugging me that if I can do that why can’t I just ask it to make them visible and define only the items I need.