首页> 资讯> 详情

excel文档加密了密码忘记了怎么打开_excel文档加密忘记密码怎么办

2023-04-07 06:58:28 来源:互联网


(资料图片)

1、只要知道密码特征,根据组合遍历尝试,一般情况下是可以解密的。

2、举例说明。

3、将文件sample保存为带密码的文件,密码设置为“123”。

4、如图:第二步:创建新文档。

5、第三步:插入模块,输入以下代码。

6、Sub crack()Dim i As LongDim FileName As Stringi = 0FileName = Application.GetOpenFilename("Excel文件(*.xls & *.xlsx),*.xls;*.xlsx", , "VBA破解")FileName = Right(FileName, Len(FileName) - InStrRev(FileName, ""))Application.ScreenUpdating = Falseline2: On Error GoTo line1***.Open FileName, , True, , iMsgBox "Password is " & iExit Subline1: i = i + 1Resume line2Application.ScreenUpdating = TrueEnd Sub 如图:第四步:运行宏。

7、如图:第五步:按提示打开指定的文件。

8、运行后结果如图:说明:这段程序仅适用于纯数字的密码; 2、如果知道密码的基本特征,对上述代码进行适当的修改,基本也可以实现。

本文分享完毕,希望对你有所帮助。

关键词:

上一篇:大学工作室工作计划表(合集4篇)
下一篇:最后一页