当遇到忘记Excel 保护密码如何处理呢?可以参照如下方法进行处理,亲测有效。
1.首先Alt+F11打开VBA编辑程序
右键模块-> 插入模块
2.打开模块编辑,输入以下代码:
Sub 移除密码()
ActiveSheet.Protect DrawingObjects:=True, CONTENTS:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=False, CONTENTS:=True, AllowFiltering:=True
ActiveSheet.Unprotect
End Sub
3.然后执行,弹出输入密码框后点击取消,ok
若无效,继续如下的方法
Sub test()
ActiveWorkbook.Sheets.Copy
For Each sh In ActiveWorkbook.Sheets
sh.Visible = True
Next
End Sub