把代码复制到你的宏模块下；把代码中123的地方，改成你工作表的密码。运行即可；
Sub test()Dim shFor Each sh In ThisWorkbook.Sheetssh.Unprotect (123)Next shEnd Sub
Sub test()Dim shFor Each sh In ThisWorkbook.Sheetssh.Unprotect (123)Next shEnd Sub
-
-
1.打开你的EXCEL文件。
2.在表格下方切换到你需要加密的那张工作表.
3.点击上方的审阅选项卡。
4.点击保护工作表。
5.输入你想设置的密码(也可以不输入)。