excel文档密码忘记了怎么解锁 ？不要着急，这个在线找回一键帮你解决

假设我们有下面这样一张工作表，双击任意单元格时，提示该工作表已经受到了保护，然后你依次点击【审阅】-【撤销工作表保护】，输入了错误的密码，提示密码不正确，我们应该怎么办呢？

一、借助专业处理工具

　　网上有一些工具能帮我们直接一键解除密码，效率非常之高。推荐大家使用【密码找回助手】，它有专门的解除excel密码的技术，可以有效帮助解决忘记密码的问题。打开找回助手的官网：https://找回助手.site   ，根据自己的需求可以选择在线找回或者选择人工找回。觉得安装工具麻烦的，可以选择在线解密，然后上传需要找回密码的文件，帮我们找回密码，在线服务不仅安全可靠，还非常实惠。

把文件在线处理平台上，上传成功后就可以点击【开始解密】按钮，等系统处理完成你就可以获得一份没有密码的excel文档，再把该文档自定义下载到电脑上即可。

二、VBA找回

复制运行以下代码，即可抹除当前工作簿所有工作表的保护加密。

Sub UnProtct()    MsgBox "破解提示：当要求输入密码时请点击取消！”"    Application.DisplayAlerts = False    On Error Resume Next    Dim sht As Worksheet    For Each sht In Worksheets        With sht            .Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFiltering:=True, AllowUsingPivotTables:=True            .Protect DrawingObjects:=False, Contents:=True, Scenarios:=False, AllowFiltering:=True, AllowUsingPivotTables:=True            .Protect DrawingObjects:=True, Contents:=True, Scenarios:=False, AllowFiltering:=True, AllowUsingPivotTables:=True            .Protect DrawingObjects:=False, Contents:=True, Scenarios:=True, AllowFiltering:=True, AllowUsingPivotTables:=True            .Unprotect        End With    Next    Application.DisplayAlerts = True    MsgBox "ok"End Sub

三、excel工具

首先，将Excel工作簿的后缀修改为rar，比如演示文件.xlsx，修改为演示文件.rar。

双击该文件，打开方式选择WinRAR。

依次双击打开xl→worksheets→需要破解保护密码的工作表名称，本例为sheet1，打开的方式选择记事本。

在记事本内，将以下内容选中删除后，关闭保存。

"<sheetProtection....../>"

此时系统会询问是否希望在压缩文件中更新它？选择是。

最后关闭所有对话框，将文件后缀名从rar修改回xlsx，以Excel的名义打开它，便可以发现相关工作表的保护设置已被全部撤除。