excel表中如何在数据源中定义一个宏按钮，点击该按钮则所有透视表就刷新数据？求详细的VBA代码~！

2025-03-02 14:31:48

推荐回答（2个）

回答1：

Sub 小按钮()
    Sheet1.PivotTables("数据透视表1").PivotCache.Refresh
End Sub

透视表所在工作表.pivotables("透视表名称").pivotcache.refresh

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Sheet1.PivotTables("数据透视表1").PivotCache.Refresh
End Sub

在源数据中定义这个更好，每修改完一个单元格数据后，自动刷新透视表。

回答2：

可以用事件+代码的形式完成。