电解质检查:Excel 2003加密文件破解方法

来源:百度文库 编辑:偶看新闻 时间:2024/05/05 11:31:59

Excel 2003加密文件破解方法

出处:多特软件站  时间:2010-09-01  人气:12662我要提问我来说两句

核心提示:我们有时候会有一些秘密文件,密码设置的有不一样,时间久了就忘记了,有什么办法或者软件可以破解呢?

      我们有时候会有一些秘密文件,密码设置的有不一样,时间久了就忘记了,有什么办法或者软件可以破解呢?下面为大家介一个简单的密码破解方法:HE的,6位以下看密码难以度,6位以上一本无望。如果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运行此宏,选择文件,等啊等(看密码长度了)到网上去下载Excel Cracker.rar 这个文件。