永发信息网

excel表格文件加密后忘记密码了,如何解密?请高手赐教!

答案:2  悬赏:0  手机版
解决时间 2021-07-19 05:46
excel表格文件加密后忘记密码了,如何解密?请高手赐教!
最佳答案
如果你只有打开密码,且密码是7位数以内的数字,可用以下步骤解开:
新开一Excel,打开,记住文件路径,取消。然后把你待解密文件copy到这一路径,改名为1.xls。然后回到Excel窗口,同时按键盘的Alt和F11,右键点左上窗口中的VBAProject,插入,模块,在右边新出来的窗口粘贴一下代码
Sub crack()
Dim i As Long
i = 1
line2:
On Error GoTo line1
Do While True
Workbooks.Open "1.xls", , , , i
Workbooks("1.xls").Close 0
MsgBox "Password is" & i
Exit Sub
Loop
line1:
i = i + 1
Resume line2
End Sub

然后运行此宏(回到Excel窗口,工具,宏,宏,DefineHyperlink,运行)

如果有字母,稍微复杂些,道理是一样的。太长的密码,基本解不开了。

若果还有读写密码,且与打开密码一样,将Workbooks.Open "1.xls", , , , i改为Workbooks.Open "1.xls", , , , i, i
全部回答

百度搜索一下

Advanced Office Password Recovery

我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
right-hand coordinate system 英语是什么意
我们校园网有人ARP攻击,使我们网速又卡又慢
DNF的时装一套多钱啊
流量看掌中书院为什么还要扣钱?
刷牙要怎么刷才算正确呢?
加了好友打招呼不理
当一个人有千言万语;需要倾诉,却找不到倾诉
大家给推荐几款手机
泡泡堂最高多少级
济宁哪里招驾驶员B2证
怎么参加任悟
儿童皮肤过敏是怎么回事?
360安全卫士扫完电脑自动关机么
查询一个人的具体信息,怎么查?我知道名字
国外客户打中国手机号码怎么打?
推荐资讯
要不要活的现实些?
为什么我每年秋天都要感冒?而且是很严重的那
~~二次函数
贵阳在哪报考PETS啊?
韩版划盖有哪些好看的手机
“前尘往事断肠诗”的下一句是什么?
DNF东北6区现在怎么进步了
一辆校车可以装多少个高尔夫球
忘了我的诛仙在哪个区怎么办
怎样快速背掉英语单词,急
一精神分裂症病人出院后不久因大量服用安眠药
有谁知道哪些拉丁舞曲,比较好听的?
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?