快速保护所有excel工作表或撤消所有工作表保护

快速保护所有excel工作表或撤消所有工作表保护

有时需要让Excel工作簿中的每个工作表只能查看而不被修改，可以对所有的工作表进行保护，如果工作簿中的工作表数量较多，手动逐一操作十分繁琐。在工作表保护密码相同或不设置密码的情况下，用下面的方法可以快速保护所有工作表。

1.按Alt+F11，打开VBA编辑器。单击菜单“视图→立即窗口”，或按Ctrl+G打开“立即窗口”。

2.在“立即窗口”中输入下列代码，然后将光标定位到语句最后按回车键运行代码：

For Each ws In Worksheets : ws.Protect Password:="123" : Next ws

工作簿中所有的工作表即被保护，本例所设置的密码为“123”。如果要撤消所有工作表的保护，只需在立即窗口中输入下面的代码并回车运行：

For Each ws In Worksheets : ws.Unprotect Password:="123" : Next ws

版权声明：本文内容由网络用户投稿，版权归原作者所有，本站不拥有其著作权，亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容，请联系我们jiasou666@gmail.com 处理，核实后本网站将在24小时内删除侵权内容。