1、首先我们打开一个空白的工作表
2、选定要保护的工作表,Ctrl+A全选所有单元格
3、Ctrl+1打开单元格格式对话框
4、保护→去掉"锁定"前面的对钩
5、审阅选项卡→保护工作表
6、在密码框中两个输入密码123456→确定
7、Alt+F11打开VBE窗口,在左上的工程窗口双击要保护的工作表,把下面的代码粘贴进去就
On Error Resume Next
ActiveSheet.Unprotect Password:="123456"
If Target <> "" Then
Target.Locked = 1
ActiveSheet.Protect Password:="123456"
End If
ActiveSheet.Unprotect Password:="123456"
If Target <> "" Then
Target.Locked = 1
ActiveSheet.Protect Password:="123456"
End If
8、Excel选项--信任中心--信任中心设置--宏设置“启用所有宏”
9、个人信息选项--取消勾选“保存 时从文件属性中删除个人信息”
10、文件--另存为--保存类型选择“Excel 启用宏的工作薄xlsm”
OK