Как я могу использовать VBA, чтобы установить флажок рядом с полем Сводная таблица, чтобы показать поле в таблице?

Question

Я надеялся, что смогу использовать такой код:
Worksheets("Sheet2").PivotTables("PivotTable3").PivotFields("Name").Visible = True
Но это не работает. Я продолжаю получать сообщение об ошибке: "Ошибка времени выполнения 438 Объект не поддерживает это свойство или метод.

Просто я хочу установить флажок рядом с именем поля в списке полей сводной таблицы. Есть идеи, как мне это сделать?

Спасибо!

Answer 1

Используйте метод PivotTable.AddFields

Worksheets("Sheet2").PivotTables("PivotTable3").AddFields("Name")