破解工作表密码/共享EXCEL表锁定破解
今天试验,真实有效。
今天下载了一个Excel2003文档,对里面的一些函数甚是感兴趣,但郁闷的是作者对文档进行了加密,有函数的地方全部设成只读属性了!在Excel的菜单中点击”撤销工作表”,提示输入密码!原来如此,上网搜了一个VBA宏破解的方法,一下就成功了啊!牛人还真的多啊!不得不佩服啊,下面就说一下这个方法吧
1. 点击“宏”→“宏”,出现窗口,在“宏名”定义一个名称为:PasswordBreaker,点击“创建”,然后关闭弹出的窗口,退出;
2. 再点击“宏”→“宏”,选择“宏名”下的“PasswordBreaker”并点击“编辑”,打开“Microsoft Visual Basic”编辑器,用如下内容替换右侧窗口中的所有代码:
Sub PasswordBreaker()
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
ActiveWorkbook.Sheets(1).Select
Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
3. 再点击“宏”→“宏”,选择“宏名”下的“PasswordBreaker”并点击“执行”,密码就现形了,有个弹出对话窗口的,告诉你一个可以用的密码。哈哈,好牛啊。
听说:在Excel2007中打开的,根本就不需要撤销密码保护,直接就可以了啊!而且也没有”撤销工作表保护”的菜单。这个我没有试验过..
20130524,今天的重要任务是破解一个局域网上共享的 excel工作簿.用我以往学习的方法一一尝试,不行啊。焦急中。..上网度娘了一下,找到了个好用的破解文件AdvancedOfficePasswordRecovery_hhw2013ok.exe 我就根据情况使用如下:
1、局域网上共享的 excel工作簿允许多人同时编辑。现在一编辑,保存时候就弹出框“文件已锁定,请梢后再试”。我重新启动了文件所在的服务器,也不行。
2、考虑到是否有人在编辑该文件时候发生故障,导致线程缩定。不给编辑。。。但考虑到现象不相似,如果这样的话,文件的提示将会是:“给xx用户编辑/琐定” 字样。所以否定该方向。
3、用在工作簿内建宏再破解密码的方法,但操作到建立 宏 的时候,却被告诉 录制新宏不能保存在当前工作簿(因为该工作簿共享),而解除该工作簿保护,又需要有密码,这样冲突,解决不了。
4、在经过考虑,还是认为解除工作簿保护,还是要破解密码为上策。所以,就用AdvancedOfficePasswordRecovery打开文件,然后破解得到密码,然后该对话框中有个“打开”的按钮(文件路径已经具备好,不用理会)。关键点来了。如果这时候你 工具 ---保护---撤消工作簿保护 ,输入密码,悲剧,这样是不行的。因为还是得到“文件已锁定,请梢后再试”的对话框。这时候,你需要做的是首先把该打开的文件另存为一个例如名aa的文件。然后,关闭所有,再打开该aa文件,发现是是共享的。你在 工具 ---保护---撤消工作簿保护 ,输入密码,ok,这时候,你会欣喜地发现,“共享”的字样已经没有了。你成功了。如果你再想加保护,则 工具 ---保护---保护共享工作簿 ,追踪修订方式打勾,输入密码,你又可以保护你的工作簿了。
到这里,解决了问题。上传该破解文件,很好用。对付ms的文件密码。