破解EXCEL VBA密码的工具

正在试图更新被保护的只读单元格或图表,如果您在修改EXCEL某个单元格时出现这个提示,本集合里面的文件对您有用,它可以更换密码. 使用时请把"EXCEL密码破解和显示.xls"和您被加密码的EXCEL都打开,在您的EXCEL里面运行"EXCEL密码破解和显示.xls"里面的那两个宏即可. 亲测可用.还带了两个文件可以教会您如何暴力破解2003及其以下的EXCEL的,并附带了一个破解打开EXCEL密码的工具.

你是否给excel文件设置了保护工作表密码，现在要撤消工作表保护，但密码却忘了，怎么办？下面的方法将轻松解决：

破解excel密码以及解除密码

测试可用 方法: 1\打开excel文件 2\在工具——宏——-录制新宏——输入名字如:brake 3\停止录制(得到一个空宏) 4\工具——宏——宏,选11,点编辑按钮 5\删除窗口中的所有字符,替换为下面的内容 6\关闭编辑窗口 7\工具——宏——宏,选AllInternalPasswords,运行,确定两次,等2分钟,再确定.OK,没有密码了!!

破解excel加密保护文件，比如说，excel文件加密了无法改动，可以试着这个！

启用宏，运行即可

破解EXCEL+WORD+密码.rar

基于VBA编写的破解EXCEL的VBA加密

Office Password Remover 是一款可以瞬间破解 Word、Excel和Access 文档密码的工具，一般情况下解密过程不超过5秒，而且操作简单，无需设置。但是使用本软件需要连接到互联网，因为要向软件服务器发送少量的数据并解密，不过本软件不会泄露任何个人隐私，请放心使用。 在日常工作中，您是否遇到过这样的情况：您用Excel编制的报表、表格、程序等，在单元格中设置了公式、函数等，为了防止其他人修改您的设置或者防止您自己无意中修改，您可能会使用Excel的工作表保护功能，但时间久了保护密码容易忘记，这该怎么办？有时您从网上下载的Excel格式的小程序，您想修改，但是作者加了工作表保护密码，怎么办？您只要按照以下步骤操作，Excel工作表保护密码瞬间即破！ 1、打开您需要破解保护密码的Excel文件； 2、依次点击菜单栏上的工具---宏----录制新宏，输入宏名字如:aa； 3、停止录制(这样得到一个空宏)； 4、依次点击菜单栏上的工具---宏----宏,选aa,点编辑按钮； 5、删除窗口中的所有字符(只有几个),替换为下面的内容； 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 passwords Const DBLSPACE As String = vbNewLine & vbNewLine Const 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 & VERSION Const MSGNOPWORDS2 As String = "There was no protect