请教关于数据透视表保护的问题

ku_dq007 · 发表于 2008-4-10 14:02

请教各位大哥，小弟最近在做一个表格时，将数据透视表和公式一起做到一个表格内。现在想对其中的公式进行保护，但是只要一加了工作表保护后，数据透视表就无法刷新了。

现请教各位大哥，能否有方法实现只保护该工作表中的公式，而数据透视表又能刷新呢？

这个问题困扰了我很久，一直找不到好的方法解决。拜托各位高手了！！！

yanjie · 发表于 2008-10-5 11:38

保护工作表时，有个“使用数据透视表”选项可以使用，但是无法做到更新。

我想可以作个按钮，撤消保护工作表---更新数据透视表---保护工作表。

Sub 保护工作表使用透视表更新()
With Worksheets("sheet1")
        .Unprotect ""
        .PivotTables(1).PivotCache.Refresh
        .EnablePivotTable = True
        .Protect ""
End With
End Sub

clrGc0TX.rar (19.26 KB, 下载次数: 49)

		自动登录	找回密码
密码			免费注册