作者：乔山办公网日期：
返回目录：office365
如果Excel文件的打开密码忘记了，且密码是7位数以内的数字，可用以下步骤解开：
新开一Excel，同时按Alt和F11，进入VBA界面，点菜单上的插入，模块，在新出来的窗口粘贴一下代码：
Sub crack()
Dim i As Long
Dim FileName As String
Application.ScreenUpdating = False
i = 1
FileName = Application.GetOpenFilename("Excel文件（*.xls & *.xlsx）,*.xls;*.xlsx", , "VBA破解")
FileName = Right(FileName, Len(FileName) - InStrRev(FileName, "\"))
line2:
On Error GoTo line1
Do While True
Workbooks.Open FileName, , , , i
MsgBox "Password is " & i
Exit Sub
Loop
line1:
i = i + 1
Resume line2
Application.ScreenUpdating = True
End Sub然后直接在此界面下按F5运行此宏如果有字母，稍微复杂些，道理是类似的。太长的密码，基本解不开了。若果还有读写密码，且与打开密码一e5a48de588b6e799bee5baa6363样，将Workbooks.Open FileName, , , , i 改为Workbooks.Open FileName, , , , i, i
可以通过以下步骤解百除Excel加密密码：
所需材料：Excel、记事本、解压软件。
一、首先点击选中被加密的表格文档，按度F2重命名，把文件格式改为RAR。
二、鼠标左键双击打开该文件，并打开XL文件夹。
三、接着问双击打开worksheets文件夹。
四、拖动sheet1.xml至电脑桌面。
五、接着使用记事本打开拖至桌面的这个文件。
六、打开后Ctrl+F查找protection这个词。
七、查找到该词后，选中该词所在尖括号内的全部内容，答并删除这些内容，Ctrl+S保存后，关闭记事本。
八、这时再把修改后的这个文件拖入解压软件内。
九、弹出的替换提醒窗口内点击替换。
十、最后再把RAR格式的文内件重新改为XLSX表格文件。
十一、这时双击打开表格后，审阅选项下的撤消保护工作表替换为了保容护工作表，说明该文件的密码已被解除。
轻松破解遗忘的Word与Excel密码
经常和办公软件打交道的人肯定知道，如果把加密文档的密码忘了就相当于将这个文件报废了,那将会是一件多么可怕的事情。但人类是万能的，今天就为大家介绍一款软件，可以松破解Word和Excel密码，解您后顾之忧。这个工具就是Office Password Remover。
它可以在很短的时间内破解Word和Excel文档的密码，经过测试最多不超过5秒。使用本软件时需要连接到Internet，因为要给该软件的服务器发送数据并解密。不过大家可以放心，本软件不会泄露任何个人隐私。
使用方法：
首先运行解压好的OPRemove.exe 这个程序，打开程序后可以看到中间文本框后面有个类似文件夹e69da5e887aae799bee5baa6e997aee7ad94362的按钮。
点击它浏览打开要破解的文档。
选择后出现下图的画面，点击移除密码。
呆几秒钟后便出现“该文档已经被成功破解”，点确定即可，这时候就大功告成了。
在这里要注意的是，破解后的文章名字会有点变化，加了“DEMO”这四个字母，翻译过来就是示范的意思，不必在意，重命名去掉就可以了。
另外，为了防止别人用该软件，也可以给它设置密码，打开软件后，点文件 — 设置访问密码，输两遍就OK了。下次运行时就出现提示要求输入运行程序的密码。
软件名称：Office Password Remover
http:///s?wd=Office+Password+Remover
不太可能找回，可以抄破解，运气好的话，可以找回简百单的密码，如果复杂的，那可能要破解了，不过还得要看你的运气了。
试试以下度软件：
1、AdvancedOffice.Password.Recovery.Pro
2、PasswarekitEnterprise
这二个软件网上都有下载，你去试一下，问说不定能给你带来好运。
别忘了采纳呀。^答_^