Удалить вычисляемые поля сводных полей

Question

Я хочу удалить вычисляемое поле в сводной таблице. Я знаю, что не могу сделать это до установки того же вычисляемого поля, что и visible = false. Поэтому я установил вычисляемое поле в объекте как невидимое.

Я попробовал две одинаковые строки кода (ниже). В первой строке содержатся две переменные с одинаковыми значениями, которые вы можете найти во второй строке.

pt = "Tabella pivot3"
CampoCalcolatoToDelete = "w 49 - 06/12 CC"

ActiveSheet.PivotTables(pt).CalculatedFields(CampoCalcolatoToDelete).Delete
ActiveSheet.PivotTables("Tabella pivot3").CalculatedFields("w 49 - 06/12 CC").Delete

Вторая строка работает нормально. Первый (с переменными) не работает.

Кто-нибудь может подсказать почему?

Спасибо

Answer 1

Вы определили свои переменные в своем коде:

Dim pt, CampoCalcolatoToDelete as String

pt = "Tabella pivot3"
CampoCalcolatoToDelete = "w 49 - 06/12 CC"

ActiveSheet.PivotTables(pt).CalculatedFields(CampoCalcolatoToDelete).Delete

Есть ли какие-либо ошибки при попытке запустить строку из вашего кода, который использует переменные?