vba - 在工作名称更改时将数据透视源文件更新到特定表源

Question

我已经在互联网上搜索了答案（例如1 2 3），但他们似乎都提供了一个相当复杂的答案，用户提出的具体条件仅适用于他们自己的项目，我打算提出这个问题切入正题，提供更多有用的通用学习资源。问题是：

如何将我的数据透视表源更新为特定的表范围？

我有一个Worksheet名为“摘要”，其中包含ListObject名为“t_sum”的以下（表）

---

问题是，在工作簿名称更改后，到数据透视表的链接会损坏，刷新它们会返回以下错误：

我尝试了一些非常简单的风格（每次打开工作簿时都会调用）

Private Sub fix_pivot_source
   For Each pivot in Sheets("Summary").PivotTables
      pivot.SourceData = "Summary!t_sum"
   Next pivot
End Sub

然而，这似乎不起作用。另一个问题是，鉴于这是一份财务报告，数据正在刷新，数据透视表名称也是如此。所以我不能直接在PivotCache

知道如何在将工作簿名称排除在等式之外的同时链接到静态表名称 - 从 SourceData 检查中有效地省略它吗？