excel怎么同时使用保护工作表和组功能

答案:2 悬赏:0 手机版

解决时间 2021-01-31 01:14

提问者网友：抽煙菂渘情少年
2021-01-30 00:19

最佳答案

五星知识达人网友：山有枢
2021-01-30 00:52

这样的问题一般用录制宏来做。
操作步骤是,
1.录制宏,
2.选中所有单元格,单元格格式隐藏锁定去掉。
3.CTRL+G,定位条件,公式
4.单元格格式,隐藏锁定勾选
5.工作表保护,去掉选定锁定单元格项。
当然,修改一下录制得到的宏最好了。
下面是代码:
SUB MACRO2()
DIM SHT AS WORKSHEET
FOR EACH SHT IN WORKSHEETSWITH SHT
.CELLS.LOCKED = FALSE
.CELLS.FORMULAHIDDEN = FALSE
.CELLS.SPECIALCELLS(XLCELLTYPEFORMULAS, 23).LOCKED = TRUE
.CELLS.SPECIALCELLS(XLCELLTYPEFORMULAS, 23).FORMULAHIDDEN = TRUE

全部回答

1楼网友：山河有幸埋战骨
2021-01-30 01:17

这样的问题一般用录制宏来做。操作步骤是, 1.录制宏, 2.选中所有单元格,单元格格式隐藏锁定去掉。 3.ctrl+g,定位条件,公式 4.单元格格式,隐藏锁定勾选 5.工作表保护,去掉选定锁定单元格项。当然,修改一下录制得到的宏最好了。下面是代码: sub macro2() dim sht as worksheet for each sht in worksheets with sht .cells.locked = false .cells.formulahidden = false .cells.specialcells(xlcelltypeformulas, 23).locked = true .cells.specialcells(xlcelltypeformulas, 23).formulahidden = true .protect drawingobjects:=true, contents:=true, scenarios:=true .enableselection = xlunlockedcells end with next end sub 使用这个宏的前提是:原来工作表不能有保护，否者就报错！

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息