为 Excel 加装快捷的公式保护器2

停止录制”工具栏上的“停止录制”按钮，退出录制状态。

　　注意:前面的操作是为了在Excel中添加“个人宏工作簿”。

　　第四步:按下Alt＋F11组合键进入VBA编辑状态，在左侧依次展开“VBAProject(PERSONAL.XLS)”、“模块”选项，双击下面的“模块1”。

第五步:用下面的代码替换右侧编辑区域中的代码:

　　Sub 保护公式()

　　ActiveSheet.Unprotect (“123456“) ’解除对工作表的保护

　　Cells.Select ’选中整个表格

　　Selection.Locked = False ’解除锁定

　　Selection.SpecialCells(xlCellTypeFormulas, 23).Select ’选中包含公式的

页码：[1] [2] [3] [4] [5] [6] 第2页、共6页

设为首页 | 加入收藏 | 广告服务 | 友情链接 | 版权申明