【无标题】

Excel解除受保护单元格部分方式

1. 在工作表菜单栏上添加[开发工具]。方法是：依次单击[文件]--->[选项]--->[自定义功能区]命令，在[自定义功能区]主选项卡下面钩选[开发工具]即可，方法因版本不同稍有差异。当然，已添加的读者，这一步是多余的；

2. 按Alt+F11快捷键，打开VBA窗口；如果VBAProject代码程度加密了，就新建一个EXCEL在按Alt+F11快捷键，打开VBA窗口；

3. 单击[插入]菜单命令，在其下拉菜单中，选择[模块1]；

4. 双击[模块1]，在其代码窗口下输入如下的代码，

   Sub DeletePW()
   ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=True
   ActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=True
   ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=True
   ActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=True
   ActiveSheet.Unprotect
   End Sub

5. 第5步：在非设计模式下，单击[运行]按钮，即可启动解除密码程序

上述文章转自 : ++https://www.cnblogs.com/jacklong-yin/p/11208938.html++**

---

更多方法可点击 ：++https://gist.github.com/parano/1868242++
GOODLUCK！！！