Метод не найден для большого набора данных. Работал на небольшом наборе данных
VBA-код в случае появления ошибки
s.PivotTables("Fragmenter").Update