Excel 2007取消密码有五种方法:一、通过“信息”选项卡清除加密文档密码;二、通过“准备”菜单取消加密并取消机密标记;三、用“另存为”清空常规选项中的密码;四、用VBA宏清除工作表保护;五、用暴力VBA破解工作表保护密码。

一、通过“信息”选项卡取消密码
Excel 2007 使用“加密文档”功能对整个工作簿进行打开权限保护,该密码存储于文件元数据中。取消密码需先进入受保护文件,再通过Office按钮进入信息面板清除密码字段。
1、双击打开已加密的Excel 2007文件,输入正确密码后点击“确定”。
2、点击左上角圆形Office按钮,选择“信息”。
3、在右侧“保护工作簿”区域,点击“用密码进行加密”。
4、在弹出的“加密文档”对话框中,将密码输入框内的所有字符全部删除。
5、点击“确定”,然后点击Office按钮选择“保存”或按Ctrl+S保存更改。
二、通过“准备”菜单取消密码
Excel 2007 的“准备”子菜单提供与文档安全相关的快速入口,其中“加密文档”与“机密文档”选项共同管理密码状态,删除密码后需同步取消机密标记以确保生效。
1、输入密码打开加密文件。
2、点击左上角圆形Office按钮,将鼠标悬停于“准备”选项上。
3、在展开的子菜单中点击“文档加密”。
4、清空密码框内容,点击“确定”。
5、再次进入“准备”菜单,点击“机密文档”,确认其未被勾选;若已勾选则单击取消。
6、按Ctrl+S保存文件。
三、通过“另存为”方式绕过密码设置
Excel 2007 在“另存为”过程中会重新生成文件结构,若在保存时未重新指定密码,则新文件将不再具备打开密码保护,原密码仅作用于旧文件副本。
1、输入密码打开加密文件。
2、点击Office按钮,选择“另存为”。
3、在“另存为”对话框中,点击右下角“工具”下拉箭头,选择“常规选项”。
4、在弹出窗口中,将“打开权限密码”和“修改权限密码”两个输入框均清空。
5、点击“确定”,再点击“保存”按钮完成操作。
四、使用宏代码清除工作表保护(适用于工作表级密码)
当Excel文件未设打开密码,但某张工作表被“保护工作表”功能锁定时,可通过VBA宏强制移除保护。此方法不破解加密,而是调用Excel内置解除接口,需启用宏功能。
1、输入密码打开文件(如设了打开密码)。
2、按Alt+F11打开VBA编辑器。
3、在左侧工程资源管理器中,右键“Normal”或当前工作簿名称,选择“插入”→“模块”。
4、在右侧代码窗口中粘贴以下语句:
Sub UnprotectSheet()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Unprotect Password:=""
Next ws
End Sub
5、将光标置于代码内任意位置,按F5执行宏。
6、关闭VBA编辑器,保存文件并重启Excel验证。
五、使用VBA暴力解除工作表保护(无密码记忆时适用)
当工作表保护密码遗忘且无备份时,可利用Excel对密码哈希校验的弱实现机制,通过遍历常见哈希值组合触发自动解除。该方法依赖Excel 2007内部校验逻辑缺陷,仅适用于工作表保护,不适用于文件打开密码。
1、输入密码打开文件(若设打开密码)。
2、按Alt+F11打开VBA编辑器。
3、插入新模块,粘贴如下代码:
Sub PasswordBreaker()
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
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & Chr(i1)
If ActiveSheet.ProtectContents = False Then
MsgBox "Password is " & Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & Chr(i1)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
End Sub
4、将光标置于代码中,按F5运行。
5、等待弹出提示框显示破解密码,随后手动执行“撤销工作表保护”即可。










