удаление поля сводной таблицы из списка полей сводной таблицы в VBA

Question

Можно ли удалить сводную область из списка полей сводной таблицы в коде VBA?

Я использую Excel 2007.

Answer 1

Я давно не работал с Excel + VBA, но вы пробовали что-то вроде:

Dim pvtField As Excel.PivotField
Dim pvtItem As Excel.PivotItem
For Each pvtField In pvtTable.PivotFields 
    For Each pvtItem In pvtField.PivotItems 
        pvtItem.Delete 
    Next 
Next 

Answer 2

Этот код должен работать для удаления поля из сводной таблицы.

    ActiveSheet.PivotTables("Name of Table").PivotFields( _
    "Name of Field").Orientation = xlHidden