加一个按钮,用vba代码刷新
1.撤销保护: ActiveSheet.Unprotect ("密码")
2.刷新某个数据透视表的语句
2.1ActiveSheet.PivotTables("数据透视表1").PivotCache.Refresh或者Worksheets("透视").PivotTables("数据透视表1").PivotCache.Refresh
2.2刷新工作簿中所有数据透视表的语句
ActiveWorkbook.RefreshAll
3.保护工作表ActiveSheet.Protect Password:="密码"