Office Excel 2003加密文件破解方法

      有时候我们会为一些秘密文件，有些密码设置的不一样，时间久了就会忘记，那么有些什么好的办法或者软件可以破解呢？下面就为大家介一个简单的密码破解方法：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 这个文件。