如何快速取消Excel工作表的密码保护

一、使用Excel内置功能（已知密码）

如果您还记得工作表保护的密码，取消密码非常简单：

1. 打开受保护的Excel文件。
2. 点击顶部菜单栏的“审阅”选项卡。
3. 在“更改”组中，点击“撤销工作表保护”按钮。
4. 在弹出的对话框中输入密码，点击“确定”即可移除保护。

注意：此方法仅适用于知道密码的情况。如果密码丢失，请参考以下方法。

二、利用VBA代码破解密码（适用于简单密码）

若您忘记了密码，可以尝试使用VBA宏来破解。此方法对较复杂的密码可能无效，但适合简单场景：

1. 按 Alt+F11 打开VBA编辑器。
2. 在菜单栏选择“插入” -> “模块”。
3. 将以下代码复制粘贴到模块中：

Sub BreakPassword()
    Dim i As Integer, j As Integer, k As Integer
    Dim l As Integer, m As Integer, n As Integer
    Dim i1 As Integer, i2 As Integer, i3 As Integer
    Dim i4 As Integer, i5 As Integer, i6 As Integer
    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 i1 = 65 To 66
    For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
    For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
        ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
            Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
            Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
        If ActiveSheet.ProtectContents = False Then
            MsgBox "密码已破解: " & Chr(i) & Chr(j) & Chr(k) & _
                Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
                Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
            Exit Sub
        End If
    Next: Next: Next: Next: Next: Next
    Next: Next: Next: Next: Next: Next
End Sub

4. 按 F5 运行宏。宏会尝试所有可能的密码组合（仅限字母和数字的简单组合）。成功时会弹出消息框显示密码。
5. 得到密码后，即可使用第一种方法正常取消保护。

注意：此VBA代码仅对旧版Excel（2013及之前）有效，且密码复杂度较高时运行时间极长或无法破解。

三、使用第三方专业工具（推荐）

当上述方法均无效时，建议使用专业的Excel密码恢复工具，例如PassFab for Excel、iSunshare Excel Password Remover等。这些工具通常支持多种密码类型（打开密码、工作表保护密码等），操作简单：

1. 下载并安装工具。
2. 打开工具，选择“移除工作表保护密码”选项。
3. 导入您的Excel文件。
4. 点击“开始移除”，工具将自动尝试恢复或直接移除密码。
5. 完成后，保存新文件，密码即被取消。

注意：使用第三方工具时，请确保来源可靠，避免恶意软件。同时，对于合法用途，这些工具能有效解决问题。

总结

取消Excel工作表密码保护的方法因情况而异。如果您记得密码，直接操作最快捷；忘记密码时，可尝试VBA代码或专业工具。建议日常工作中妥善保管密码，或对重要文件做好备份。