1、同时按 alt+f11
2、再打开的VB编辑器中粘贴如下程序:Private Sub Worksheet_Activate() S茑霁酌绡heets("源数据表").PivotTables("数据透视表").RefreshTable End Sub
3、关闭VB编辑器
1、同时按 alt+f11
2、再打开的VB编辑器中粘贴如下程序:Private Sub Worksheet_Activate() S茑霁酌绡heets("源数据表").PivotTables("数据透视表").RefreshTable End Sub
3、关闭VB编辑器