excel密码破解
一、简介
目前本版本可以破解Access97/2000/xp密码，Word/Excel97/2000/xp、SQLSERVER（本地和远程）、windows98登陆密码及屏保密码、ZIP/RAR文件密码，星号密码察看，可以察看任何显示为*的密码内容（网页除外）。请勿用于非法用途，对用户使用本软件所产生的后果，作者不负任何法律责任，请谨慎使用本软件。
二、步骤
如果表格被保护了，即开着，但是不能改动，且密码是7位数以内的数字，如下操作：在Excel窗口，同时按键盘的Alt和F11，点菜单上的插入，模块，在右边新出来的窗口粘贴一下代码：Sub crackProtect()Dim i As Longi = 1line2:On Error GoTo line1Do While TrueActiveWorkbook.Unprotect iMsgBox "Password is" & iExit SubLoopline1:i = i + 1Resume line2End Sub然后按F5运行此宏。如果有字母，稍微复杂些，道理是一样的。太长的密码，基本解不开了。如果Excel文件的打开密码忘记了，且密码是7位数以内的数字，可用以下步骤解开：新开一Excel，同时按Alt和F11，进入VBA界面，点菜单上的插入，模块，在新出来的窗口粘贴一下代码：Sub crack()Dim i As LongDim FileName As StringApplication.ScreenUpdating = Falsei = 1FileName = Application.GetOpenFilename("Excel文件（*.xls & *.xlsx）,*.xls;*.xlsx", , "VBA破解")FileName = Right(FileName, Len(FileName) - InStrRev(FileName, "\"))line2:On Error GoTo line1Do While TrueWorkbooks.Open FileName, , , , iWorkbooks(FileName).Close 0MsgBox "Password is " & iExit SubLoopline1:i = i + 1Resume line2Application.ScreenUpdating = TrueEnd Sub然后按F5运行此宏如果有字母，稍微复杂些，道理是类似的。太长的密码，基本解不开了。若果还有读写密码，且与打开密码一样，将Workbooks.Open FileName, , , , i 改为Workbooks.Open FileName, , , , i, i
上一篇： 央视新台长
下一篇：pdf转换成word
excel密码破解
