无法获取工作表类的数据透视表属性

我正在尝试使用另一个人创build的VBA，它给了我一个我似乎无法修复的错误。 代码如下：

Sub Format_Homeward_V3() ' Format_Homeward_V3 Macro ChDir "J:\Templates" Workbooks.Open Filename:= _ "J:\Templates\Homeward_Exception_Report_Template_Final.xlsx" Workbooks.Open Filename:= _ "J:\Templates\Homeward_Inventory_Report_Template_Final.xlsx" Range("A4").Select Sheets("Homeward_Summary").PivotTables("MyPivot").PivotCache.Refresh Sheets("Detail").Select Range("A1").Select 

它错误地在：

 Sheets("Homeward_Summary").PivotTables("MyPivot").PivotCache.Refresh 

并给出了错误：

“无法获得工作表类的pivottables属性”

但据我所知，它正在查看正确的工作表和正确的名称的数据透视表。 我也尝试做.RefreshTable而不是caching刷新，但得到了同样的错误。 我真的不知道为什么会给我这个错误，我不知道还有什么可以尝试的。 一直没有这个错误的工作。

Answer 1

确保所有内容都被引用，然后不要猜测你正在处理哪个工作簿或工作表（赦免速记，根据需要更改）

 Sub Format_Homeward_V3() Dim wbe As Workbook Dim wbi As Workbook Dim ws As Worksheet Set wbe = Workbooks.Open("J:\Templates\Homeward_Exception_Report_Template_Final.xlsx") Set wbi = Workbooks.Open("J:\Templates\Homeward_Inventory_Report_Template_Final.xlsx") Set ws = wbi.Sheets("PIVOT") ws.Range("A4").Select ws.PivotTables("MyPivot").PivotCache.Refresh