EXCEL密码忘了怎么办?破解EXCEL的打开密码

2021-03-17 17:21:00  阅读 469 次 评论 0 条

如果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运行此宏,选择文件,等啊等(看密码长度了)


个人建议使用破解软件:点击下载

PS : 破解时间看密码长度,密码复杂程序,电脑配置。

电脑配置低,密码复杂的话不建议使用,浪费时间的

WPS达师专注于免费分享WPS Office使用教程、PPT、word模板及办公常用软件等资源,欢迎大家收藏和分享本站。
WPS表格数据付费处理请加QQ:3247742

发表评论


表情

还没有留言,还不快点抢沙发?