运行时错误“1004”无法在 Excel 2013 中获取数据透视表类的 PivotFields 属性

Question

我收到此错误：

运行时错误“1004”无法获取 PivotTable 类的 PivotFields 属性

我在 Excel VBA（2013 版）中发生了这种情况，但相同的代码在运行 Office 365 的另一台计算机上成功执行。

With pt
  .PivotFields(fieldName).ClearLabelFilters
  .PivotFields(fieldName).PivotFilters.Add Type:=xlCaptionEquals, Value1:=strFilter
End With

为了确保正确命名数据透视过滤器，我尝试遍历数据透视表以获取所有数据透视表和字段的名称：

Dim pt As PivotTable
Dim pf As PivotField

wb.Worksheets("Sheet1").Activate
For Each pt In wb.Worksheets("Sheet1").PivotTables
  Debug.Print pt.Name
  For Each pf In pt.PivotFields
    Debug.Print pf.Name
  Next pf
Next pt

这成功打印了数据透视表的名称，但在遇到此行时出现相同的错误：

For Each pf In pt.PivotFields

我尝试通过录制宏并更改数据透视表中的过滤器。 录制的宏在以下行失败：

ActiveSheet.PivotTables("testPivotTable").PivotFields("TYPE").ClearAllFilters

如果有人了解 PivotFields 属性可能对我的应用程序不可用的原因或任何进一步故障排除的想法，请告诉我。