unable to get the pivotfields property of the pivottable class
 

In an Excel macro to create a pivot table, I am suddenly getting this
message: unable to get the pivotfields property of the pivottable class.
This used to work fine and nothing changed. Any ideas on this? The code is
shown:

Sheets("Reorder").Select
With ActiveSheet.PivotTables("PivotSKU").PivotFields("M onth-Yr")
.Orientation = xlRowField
.Position = 1
End With