从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