如何撤销工作表的密码

工作表密码用于保护Excel工作表中的数据不被随意修改，但若忘记密码或需要解除保护，可通过以下方法撤销。请注意：仅供合法用途，未经授权解除他人密码可能违反法律。

方法一：使用已知密码直接撤销

1. 打开受保护的工作表。
2. 点击“审阅”选项卡 > “撤销工作表保护”。
3. 输入密码，点击“确定”。

方法二：利用VBA代码强制移除（无密码时）

此方法适用于Excel 2010及更早版本，或对未加密的.xls文件有效。步骤：

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

   Sub RemovePassword()
       Dim i As Integer, j As Integer, k As Integer
       Dim l As Integer, m As Integer, n As Integer
       Dim o As Integer, p As Integer, q As Integer
       Dim r As Integer, s As Integer, t As Integer
       Dim u As Integer, v As Integer, w As Integer
       Dim x As Integer, y As Integer, z 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 n = 65 To 66
       For o = 65 To 66: For p = 65 To 66: For q = 65 To 66
       For r = 65 To 66: For s = 65 To 66: For t = 65 To 66
       For u = 65 To 66: For v = 65 To 66: For w = 65 To 66
       For x = 65 To 66: For y = 65 To 66: For z = 65 To 66
       ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
           Chr(l) & Chr(m) & Chr(n) & Chr(o) & Chr(p) & _
           Chr(q) & Chr(r) & Chr(s) & Chr(t) & Chr(u) & _
           Chr(v) & Chr(w) & Chr(x) & Chr(y) & Chr(z)
       Next: Next: Next: Next: Next: Next
       Next: Next: Next: Next: Next: Next
       Next: Next: Next: Next: Next: Next
   End Sub

4. 按下 F5 运行代码，等待数分钟即可解除保护。

方法三：使用第三方工具

若上述方法无效或Excel版本较新，可使用专业密码恢复工具（如 PassFab for Excel、iSunshare Excel Password Remover）。注意：从官方渠道下载，避免恶意软件。

安全建议

• 定期备份重要工作簿。
• 使用强密码并记录在安全位置。
• 仅对自有或授权文件执行密码撤销操作。

以上方法帮助您恢复对工作表的控制，请合理使用。