Excel文档怎么取消加密?三种方法轻松移除密码保护

Excel文档加密的类型

在取消加密前,需区分Excel加密类型:

  • 工作簿打开密码:需要密码才能打开文件。
  • 保护工作簿结构:限制对工作簿结构的修改(如移动、删除工作表)。
  • 保护工作表:限制对特定工作表的编辑。

方法一:已知密码时取消保护

取消工作表保护

  1. 打开Excel文档,点击被保护的工作表标签。
  2. 点击“审阅”选项卡 > “撤销工作表保护”。
  3. 输入密码,点击“确定”。

取消工作簿保护

  1. 点击“审阅”选项卡 > “保护工作簿”。
  2. 在弹出的对话框中取消“保护工作簿”复选框,输入密码确认。

方法二:忘记密码时尝试VBA代码

此方法适用于Excel 2013及以下版本(因为新版本加密更强)。

  1. Alt + F11 打开VBA编辑器。
  2. 点击菜单“插入” > “模块”。
  3. 粘贴以下代码:
    Sub RemoveProtection()
    Dim i As Long, j As Long, k As Long, l As Long, m As Long, n As Long
    Dim a As Long, b As Long, c As Long, d As Long, e As Long, f As Long
    On Error Resume Next
    For i = 65 To 66: For j = 65 To 66: For k = 65 To 66: For l = 65 To 66
    For m = 65 To 66: For n = 65 To 66: For a = 65 To 66: For b = 65 To 66
    For c = 65 To 66: For d = 65 To 66: For e = 65 To 66: For f = 65 To 66
    ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & Chr(l) &
    Chr(m) & Chr(n) & Chr(a) & Chr(b) & Chr(c) & Chr(d) & Chr(e) & Chr(f)
    If ActiveSheet.ProtectContents = False Then
    MsgBox "密码是: " & Chr(i) & Chr(j) & Chr(k) & Chr(l) &
    Chr(m) & Chr(n) & Chr(a) & Chr(b) & Chr(c) & Chr(d) & Chr(e) & Chr(f)
    Exit Sub
    End If
    Next: Next: Next: Next: Next: Next: Next: Next
    Next: Next: Next: Next
    End Sub
  4. F5 运行代码。如果密码简单,可能很快破解。
  5. 若代码运行后工作表保护依然存在,说明密码复杂,需使用专业工具。

方法三:使用第三方工具

推荐工具:PassFab for Excel、iSeePassword Excel Password Recovery等。步骤类似:

  1. 下载安装软件,选择“移除Excel密码”功能。
  2. 导入加密的Excel文件。
  3. 选择攻击方式(如暴力破解、字典攻击等),设置参数后开始移除。
  4. 等待几秒至几分钟,密码被清除后保存为新文件。

注意事项

  • 破解他人Excel文档前,请确认你有合法权限。
  • 工作簿打开密码较难破解,建议使用专业工具或联系数据库管理员。
  • VBA代码仅适用于弱密码,且可能触发杀毒软件误报。