Question

Excel受保护的工作表如何展开和折叠分级单元行或列

统计每天的产品良率问题，在一工作表进行分级显示，一张表统计一个月；目前遇到问题是：若开启工作表保护，则分级显示只能处于折叠或展开状态，不能调整；
如图所示，因统计需要需要将已经套好公式的单元格进行保护，但保护后则不能再展开和折叠分级单元行，请问应当如何设置才能在保护工作表的情况下仍然能够展开和折叠工作表





Answer 1

VBA解决方法

第一步:按alt+F11打开vbe编辑器,双击Thisworkbook,复制以下代码粘贴

Private Sub Workbook_Open()

With Sheets("sheet1")     ' 把  sheet1  改成你的工作表名称

.EnableOutlining = 1

.Protect "123", userInterfaceOnly:=True  ' 把  123  改成你的保护密码

End With

End Sub

第二步:把宏的安全性调到低,如果是07以上格式请保存为XLSM格式

第三步:关闭工作簿   重新打开即可

当然  你也可以给你的vba工程加上密码

追问

你好，麻烦你再指点一下，我根据你的提示操作，但还是遇到报警问题，不知是否方便添加你的邮箱讨论一下呢，或者方便留下你的联络方式吗？我的邮箱为rxdjl@126.com；若方便还请留下你电话，我再请教一下你，感谢！

追答