excel - Excel Vba 刷新数据透视表，它们从报表连接中消失

Question

我是 VBA 的新手，我正在尝试刷新给定工作表中所有数据透视表的范围这是我正在使用的一段代码

    For Each pvtbl In DashboardSheet.PivotTables
       'change the Ranges
       DashboardSheet.PivotTables(pvtbl.Name).ChangePivotCache 
       ActiveWorkbook.PivotCaches.Create _
       (SourceType:=xlDatabase, SourceData:=NewRangeName)
    Next

这很好用，但不幸的是有两个问题

1-如果我尝试添加切片器，我看不到将切片器链接到所有枢轴的报告连接（所有枢轴具有相同的源范围）
2-如果我已经有切片器，则此代码不起作用

我遇到的错误之一是当我打开文件并尝试过滤“数据透视表报告在没有基础数据的情况下保存”时，非常感谢您的帮助，因为我在互联网上进行了研究，但无法真正理解什么我做错了

标签： excelvbapivot-table