EXCEL加密文件破解
答案:3 悬赏:70 手机版
解决时间 2021-02-10 15:46
- 提问者网友:谁的错
- 2021-02-10 08:08
哪位好心人可以帮我把EXCEL加密文件破解了
最佳答案
- 五星知识达人网友:你可爱的野爹
- 2021-02-10 09:27
如果Excel文件的打开密码忘记了,且密码是6位数以内的数字,可用以下步骤解开(关掉所有程序,为了速度):
新开一Excel,同时按Alt和F11,进入VBA界面,点菜单上的插入,模块,在新出来的窗口粘贴一下代码:
Sub crack()
Dim i As Long
Dim FileName As String
i = 0
FileName = Application.GetOpenFilename("Excel文件(*.xls & *.xlsx),*.xls;*.xlsx", , "VBA破解")
FileName = Right(FileName, Len(FileName) - InStrRev(FileName, "\"))
Application.ScreenUpdating = False
line2: On Error GoTo line1
Workbooks.Open FileName, , True, , i
MsgBox "Password is " & i
Exit Sub
line1: i = i + 1
Resume line2
Application.ScreenUpdating = True
End Sub
然后在此界面直接按F5运行此宏,选择文件,等啊等(看密码长度了)
转载自 sjaiksjkfs
新开一Excel,同时按Alt和F11,进入VBA界面,点菜单上的插入,模块,在新出来的窗口粘贴一下代码:
Sub crack()
Dim i As Long
Dim FileName As String
i = 0
FileName = Application.GetOpenFilename("Excel文件(*.xls & *.xlsx),*.xls;*.xlsx", , "VBA破解")
FileName = Right(FileName, Len(FileName) - InStrRev(FileName, "\"))
Application.ScreenUpdating = False
line2: On Error GoTo line1
Workbooks.Open FileName, , True, , i
MsgBox "Password is " & i
Exit Sub
line1: i = i + 1
Resume line2
Application.ScreenUpdating = True
End Sub
然后在此界面直接按F5运行此宏,选择文件,等啊等(看密码长度了)
转载自 sjaiksjkfs
全部回答
- 1楼网友:渊鱼
- 2021-02-10 11:37
1、百度“5秒WORD-EXCEL密码破解”,点击下方的连接,下载软件,软件不是很大,直接下载下来就可以了,下载下来是一个压缩包,解压该压缩包。打开压缩包解压出来的文件夹,第二个文件就是我们的密码破解工具,双击打开工具。
2、浏览,找到我们要破解的文件,点击确定,破解就开始啦。点击移除密码。
3、弹出对话框,点击确定,当然,电脑是要能联网的,相信你能看到这篇经验,电脑应该也是能联网的。
- 2楼网友:你可爱的野爹
- 2021-02-10 10:05
打开文档后,通过文件菜单中“另存为”,将文档存为rtf格式。保存好文件后,先关掉文档再打开另存的文件,选择工具栏中的“解除文档保护”命令,不用填写密码就可以解除此文件的“文档保护功能”,而且任何信息都不会丢失。
用office password remover这个软件可以打开。 使用方法: 首先运行解压好的opremove.exe 这个程式,打开程式后能看到中间文本框后面有个类似目录的按钮。 选择后出现下图的画面,点击移除密码。 呆几秒钟后便出现“该文件已被成功破解”,点确定即可,这时候就大功告成了。 在这里要注意的是,破解后的文章名字会有点变化,加了“demo”这四个字母,翻译过来就是示范的意思,不必在意,重命名去掉就能了。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯