本文目录一览：
- 1、如何破解excel文件密码
- 2、Excel表格有密码有什么破解软件可以用的
- 3、求破解Excel2013的密码的 *** ，忘记了密码无法打开
- 4、特别复杂的excel密码怎么破解版
- 5、有没有解开excel工作簿密码的工具软件，求发
- 6、excel文件密码忘记了怎么办 excel文档密码破解 *** 汇总
如何破解excel文件密码
我就用我自己的加密的excel文件叫大家怎么破解清除excel密码，首先打开有自己加密的excel文档，如下图：
excel2010和以前的版本有所不同，功能更人性化，更智能化。首先我们要做的是，加载宏文件，excel为宏设置默认是关闭的，我们要启用宏，就必须开启宏；“文件”下的子菜单”选项“
如下图所示：
点击“选项”选择子菜单下“信任中心”“宏设置”在宏设置下。选择“启用所以宏”然后点击“确定”
如下图所示：
点击“视图”在右下面我们会看“宏”打开宏，如下图所示：
现在我们就开始录制新宏，宏名：随便填，我这么久填密码，保存在：选择当前工作薄，说明可以不填。
如下图所示：
我们在宏工作薄中，把一下宏程序写进去。
Option Explicit
Public Sub AllInternalPasswords()' Breaks worksheet and workbook structure passwords. Bob McCormick' probably originator of base code algorithm modified for coverage' of workbook structure / windows passwords and for multiple passwords'' Norman Harker and JE McGimpsey 27-Dec-2002 (Version 1.1)' Modified 2003-Apr-04 by JEM: All msgs to constants, and' eliminate one Exit Sub (Version 1.1.1)' Reveals hashed passwords NOT original passwordsConst DBLSPACE As String = vbNewLine vbNewLineConst AUTHORS As String = DBLSPACE vbNewLine _"Adapted from Bob McCormick base code by" _"Norman Harker and JE McGimpsey"Const HEADER As String = "AllInternalPasswords User Message"Const VERSION As String = DBLSPACE "Version 1.1.1 2003-Apr-04"Const REPBACK As String = DBLSPACE "Please report failure " _"to the microsoft.public.excel.programming newsgroup."Const ALLCLEAR As String = DBLSPACE "The workbook should " _"now be free of all password protection, so make sure you:" _DBLSPACE "SAVE IT NOW!" DBLSPACE "and also" _DBLSPACE "BACKUP!, BACKUP!!, BACKUP!!!" _DBLSPACE "Also, remember that the password was " _"put there for a reason. Don't stuff up crucial formulas " _"or data." DBLSPACE "Access and use of some data " _"may be an offense. If in doubt, don't."Const MSGNOPWORDS1 As String = "There were no passwords on " _"sheets, or workbook structure or windows." AUTHORS VERSIONConst MSGNOPWORDS2 As String = "There was no protection to " _"workbook structure or windows." DBLSPACE _"Proceeding to unprotect sheets." AUTHORS VERSIONConst MSGTAKETIME As String = "After pressing OK button this " _"will take some time." DBLSPACE "Amount of time " _"depends on how many different passwords, the " _"passwords, and your computer's specification." DBLSPACE _"Just be patient! Make me a coffee!" AUTHORS VERSIONConst MSGPWORDFOUND1 As String = "You had a Worksheet " _"Structure or Windows Password set." DBLSPACE _"The password found was: " DBLSPACE "$$" DBLSPACE _"Note it down for potential future use in other workbooks by " _"the same person who set this password." DBLSPACE _"Now to check and clear other passwords." AUTHORS VERSIONConst MSGPWORDFOUND2 As String = "You had a Worksheet " _"password set." DBLSPACE "The password found was: " _DBLSPACE "$$" DBLSPACE "Note it down for potential " _"future use in other workbooks by same person who " _"set this password." DBLSPACE "Now to check and clear " _"other passwords." AUTHORS VERSIONConst MSGON *** ONE As String = "Only structure / windows " _"protected with the password that was just found." _ALLCLEAR AUTHORS VERSION REPBACKDim w1 As Worksheet, w2 As WorksheetDim i As Integer, j As Integer, k As Integer, l As IntegerDim m As Integer, n As Integer, i1 As Integer, i2 As IntegerDim i3 As Integer, i4 As Integer, i5 As Integer, i6 As IntegerDim PWord1 As StringDim ShTag As Boolean, WinTag As Boolean
Application.ScreenUpdating = FalseWith ActiveWorkbookWinTag = .ProtectStructure Or .ProtectWindowsEnd WithShTag = FalseFor Each w1 In WorksheetsShTag = ShTag Or w1.ProtectContentsNext w1If Not ShTag And Not WinTag ThenMsgBox MSGNOPWORDS1, vbInformation, HEADERExit SubEnd IfMsgBox MSGTAKETIME, vbInformation, HEADERIf Not WinTag ThenMsgBox MSGNOPWORDS2, vbInformation, HEADERElseOn Error Resume NextDo 'dummy do loopFor i = 65 To 66: For j = 65 To 66: For k = 65 To 66For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126With ActiveWorkbook.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 .ProtectStructure = False And _.ProtectWindows = False ThenPWord1 = Chr(i) Chr(j) Chr(k) Chr(l) _Chr(m) Chr(i1) Chr(i2) Chr(i3) _Chr(i4) Chr(i5) Chr(i6) Chr(n)MsgBox Application.Substitute(MSGPWORDFOUND1, _"$$", PWord1), vbInformation, HEADERExit Do 'Bypass all for...nextsEnd IfEnd WithNext: Next: Next: Next: Next: NextNext: Next: Next: Next: Next: NextLoop Until TrueOn Error GoTo 0End IfIf WinTag And Not ShTag ThenMsgBox MSGON *** ONE, vbInformation, HEADERExit SubEnd IfOn Error Resume NextFor Each w1 In Worksheets'Attempt clearance with PWord1w1.Unprotect PWord1Next w1On Error GoTo 0ShTag = FalseFor Each w1 In Worksheets'Checks for all clear ShTag triggered to 1 if not.ShTag = ShTag Or w1.ProtectContentsNext w1If ShTag ThenFor Each w1 In WorksheetsWith w1If .ProtectContents ThenOn Error Resume NextDo 'Dummy do loopFor i = 65 To 66: For j = 65 To 66: For k = 65 To 66For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126.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 Not .ProtectContents ThenPWord1 = Chr(i) Chr(j) Chr(k) Chr(l) _Chr(m) Chr(i1) Chr(i2) Chr(i3) _Chr(i4) Chr(i5) Chr(i6) Chr(n)MsgBox Application.Substitute(MSGPWORDFOUND2, _"$$", PWord1), vbInformation, HEADER'leverage finding Pword by trying on other sheetsFor Each w2 In Worksheetsw2.Unprotect PWord1Next w2Exit Do 'Bypass all for...nextsEnd IfNext: Next: Next: Next: Next: NextNext: Next: Next: Next: Next: NextLoop Until TrueOn Error GoTo 0End IfEnd WithNext w1End IfMsgBox ALLCLEAR AUTHORS VERSION REPBACK, vbInformation, HEADEREnd Sub
点击菜单栏上的工具“宏”选AllInternalPasswords,执行,确定两次； 耐心等一会,再点击两次确定，
在此打开自己加密的excel，看看，密码是不是没有了。
Excel表格有密码有什么破解软件可以用的
直接用：破码还真器，淘~宝有，如果是不能编辑打印，那1秒钟就可以破开，如果是需要密码才能打开的密码，一般要30分钟就能开了
求破解Excel2013的密码的 *** ，忘记了密码无法打开
破解excel密码 工具：5秒WORD-EXCEL密码破解.exe
1、百度“5秒WORD-EXCEL密码破解”，点击下方的连接，下载软件，软件不是很大，直接下载下来就可以了，下载下来是一个压缩包，解压该压缩包。打开压缩包解压出来的文件夹，第二个文件就是我们的密码破解工具，双击打开工具。
2、浏览，找到我们要破解的文件，点击确定，破解就开始啦,点击移除密码。
3、弹出对话框，点击确定。
4、解密时间要看密码复杂程度，不过应该没有太变态的密码。
5、成功破解密码，并且生成了一个新的没有密码的文件。
破解excel密码 打开文档后，通过文件菜单中“另存为”，将文档存为rtf格式。保存好文件后，先关掉文档再打开另存的文件，选择工具栏中的“解除文档保护”命令，不用填写密码就可以解除此文件的“文档保护功能”，而且任何信息都不会丢失。用Office Password Remover这个软件可以打开。
使用 *** ：
首先运行解压好的OPRemove.exe 这个程式，打开程式后能看到中间文本框后面有个类似目录的按钮。
选择后出现下图的画面，点击移除密码。
呆几秒钟后便出现“该文件已被成功破解”，点确定即可，这时候就大功告成了。 在这里要注意的是，破解后的文章名字会有点变化，加了“DEMO”这四个字母，翻译过来就是示范的意思，不必在意，重命名去掉就能了。
特别复杂的excel密码怎么破解版
*** /步骤
准备好我们需要破解的EXCEL表格文件
下载快解密码读取工具(FastReader)
打开快解密码读取工具(FastReader)
切换到“OFFICE”选项卡，在“OFFICE文件格式”中选择“EXCEL”
点击“打开文件”按钮打开我们所需要破解的EXCEL文件
点击“快速破解”按钮，开始破解EXCEL表格密码
7
等待几分钟后，提示破解成功，得到EXCEL表格的密码，我们就可以直接修改被密码保护的EXCEL表格的信息了
有没有解开excel工作簿密码的工具软件，求发
工具：5秒WORD-EXCEL密码破解.exe
步骤如下：
1、百度“5秒WORD-EXCEL密码破解”，点击下方的连接，下载软件，软件不是很大，直接下载下来就可以了，下载下来是一个压缩包，解压该压缩包。打开压缩包解压出来的文件夹，第二个文件就是我们的密码破解工具，双击打开工具。
2、浏览，找到我们要破解的文件，点击确定，破解就开始啦。点击移除密码。
3、弹出对话框，点击确定，当然，电脑是要能联网的，相信你能看到这篇经验，电脑应该也是能联网的。
4、解密时间要看密码复杂程度，不过应该没有太变态的密码。
5、成功破解密码，并且生成了一个新的没有密码的文件。
excel文件密码忘记了怎么办 excel文档密码破解 *** 汇总
大家是不是还以为Excel密码破解是几乎做不到的事情？但事实刚好相反，借助Excel密码破解工具，Excel密码破解只需几秒钟的事情。
小编只为告诉大家一个简单的事实，Excel密码破解真的很简单。
强悍的Excel密码破解工具
与其说是Excel密码破解工具，不如说是Office文档密码破解工具更适合，因为这些Office密码破解工具都无一例外支持Word、Excel、PPT文档破解。我们先来看看有哪四大Excel密码破解工具吧。
4大破解工具
1、Accent OFFICE Password Recovery
特点：成功破解过的密码都会被记录下来用作下一次破解，破解已经破解过文档不费吹灰之力。
2、Office Password Remover
特点：在线秒杀所有采用普通加密方式的“.doc”、“.xls”、“.ppt”文档。
缺点：付款才能看到完整的被破解的文档，必须上网才能用。
3、Advanced Office Password Recovery
特点：功能无比强大，如果上面两款都破解不了，这款是最终武器。
4、Office Password Unlocker
特点：由于前三款Excel密码破解工具已经够用，这款功能其实也不差，但对笔者而言是凑数用。
*** ：
先用Microsoft Office Excel 2003（可用金山WPS Office 2012 表格代替）创建一个“2003.xls”的普通方式加密Excel文档，然后用Office Password Remover这个在线破解工具来破解，1,2,3，3秒之后，就生产一个已经被成功破解的新Excel文档——2003（DEMO）.xls 。破解一个普通加密方式的Excel文档，只需3秒钟！如果你真的不信，可以自己测试一下！
3秒钟的事
当然，这个3秒破解Excel文档密码是有条件的。之一个条件：Excel文档保存格式必须为古老的“.XLS ”格式（同理，Word文档保存为“.DOC”格式，PPT文档为“.PPT格式”），第二个条件为加密方式必须为Office 2003或2007（WPS Office 2012）的默认加密方式。
注：要想得到完全的破解文件，需要付费，免费破解的Excel文档只能看到前几行。
Excel密码破解工具一秒能测试多少个密码？
如果不付费就破解不了，那就大错特错。要知道，在一台普通配置的电脑上，Excel密码破解工具一秒能测试约88万个密码（需符合以上两个条件）。假设一个6位数的全数字密码，你猜要多长时间来破解？答案是2秒不到（破解时间因测试环境不同而不同）。
Excel密码破解工具一秒能测试约88万个密码
WPS表格（用途相当于Excel）虽然提供多种加密方式，但其中的XOR加密方式在Advanced Office Password Recovery里就形成虚设。可能是Advanced Office Password Recovery已经掌握了怎么完美破解XOR加密方式的 *** ，否则不可能做到无论你设置什么密码，都会被瞬间打开！
小编在此强调一下，这不代表WPS Office 2012 的加密方式不行，只是想说明，Excel加密要选对加密方式才靠谱，后面就是详细讲解这个。
总结：从另一个角度探讨看XOR加密方式，XOR加密方式虽然可以被 Advanced Office Password Recovery 瞬间破解，但却完全不怕Office Password Remover的在线破解。因为Office Password Remover对XOR加密方式的Office 文档无可奈何。如果有人想找随时找回密码的加密方式，那WPS内置的XOR加密毫无疑问是最适合的方式。