1. 如何破解excel的vba密码
如果密码是很简单的几位数数字，相对容易用VBA暴力破解，很复杂的话就很难了
2. excel的密码怎么破解
1 打开excel表格，点击审阅-撤销工作表保护
2出现菜单后，输入密码，点击确定
3当图标变成保护工作表，就解锁了。
3. VBA密码破解
不用给VBA代码就可以保护你的VBA代码啦~第一种：在VBE窗口中单击菜单“工具”->“VBAProject属性”->“保护”->勾选“查看时锁定工程”输入密码->确认密码。保存关闭后重新打开就行了。还有一种就是“工程不可查看”，先试一下第一种，不行再HI我。
4. vba破解excel加密文件
1.搜一下绿色的OfficeKey
2.advanced vba passward recover pro，要注册，要找个已经注册的也不容易
3.用16进制编辑工具，如winhex、ultraedit-32打开X.xls文件，将CMG=，DPB=和GC=后的"="替换为"."，最后一种最方便。【注意留备份，以免意外！】
5. excel vba密码咋破
当然会出错：
因为你加密了VBA工程，而加密的VBA工程的里的代码就会被保护。
也就是说VBA工程加密后，不可以增加删除代码，不可以增加删除窗体，不可以增加删除模块和类模块。而你的代码中：
Set usForm =ThisWorkbook.VBProject.VBComponents.Add(vbext_ct_MSForm)这个是增加一个窗体，这对受保护的工程来说是不被允许的。除了你这个，还有例如ThisWorkbook.VBProject.VBComponents.Remove XXXXX（删除代码）
ThisWorkbook.VBProject.VBComponents.Add(vbext_ct_StdModule).Name = "模块1"(增加模块）
等等都是不可以的。
如果你即要加密VBA工程，又想让程序在运行过程中去新增窗体，建议可以考虑一下sendkey方法，在程序开始运行时执行sendkey解锁工程密码。你可以试试代码：（在我电脑上测试了是可以输入或增加工程密码的）
你可以在你增加窗体的那句代码前先执行inputpw()解锁工程密码。
Sub inputpw() '输入密码解锁 Dim pw$ pw = "password" If ThisWorkbook.VBProject.Protection = vbext_pp_locked Then '判断工程是否解锁 '打开VBAProject工程属性 Application.VBE.CommandBars(1).Controls("工具(T)").Controls("VBAProject 属性(&E)...").Execute Application.SendKeys pw '输入密码 Application.SendKeys "{ENTER}" 'enter解锁 End If End If End Sub Sub addpw() '加工程密码 Dim pw$ pw = "password" If ThisWorkbook.VBProject.Protection = vbext_pp_none Then '判断是否加密码工程 '打开VBAProject工程属性 Application.VBE.CommandBars(1).Controls("工具(T)").Controls("VBAProject 属性(&E)...").Execute Application.SendKeys "^+{TAB}" 'ctrl+tab移动到保护 Application.SendKeys "{TAB}" 'tab移动到第一次输密码位置 Application.SendKeys pw '输入密码 Application.SendKeys "{TAB}" 'tab移动到第二次输密码位置 Application.SendKeys pw '输入密码 Application.SendKeys "{ENTER}" 'enter加锁 DoEvents End If End Sub
6. 如何解除Excel的VBA密码
如果你只有打开密码，且密码是7位数以内的数字，可用以下步骤解开：
新开一Excel，打开，记住文件路径，取消。然后把你待解密文件copy到这一路径，改名为1.xls。然后回到Excel窗口，同时按键盘的Alt和F11，右键点左上窗口中的VBAProject，插入，模块，在右边新出来的窗口粘贴一下代码
Subcrack()
DimiAsLong
i=1
line2:
OnErrorGoToline1
DoWhileTrue
Workbooks.Open"1.xls",,,,i
Workbooks("1.xls").Close0
MsgBox"Passwordis"&i
ExitSub
Loop
line1:
i=i+1
Resumeline2
EndSub
然后运行此宏（回到Excel窗口，工具，宏，宏，DefineHyperlink，运行）
如果有字母，稍微复杂些，道理是一样的。太长的密码，基本解不开了。
若果还有读写密码，且与打开密码一样，将Workbooks.Open"1.xls",,,,i改为Workbooks.Open"1.xls",,,,i,i
7. excel vba加密破解
最标准的方法就是直接输入密码，然后解密，保存。如果有宏代码的话：
1、录制宏，随便点下鼠标，然后停止。
2、打开宏编辑器，将你的VBA代码完全覆盖编辑器里刚录制的那些代码。
3、打开需要去除保护的excel，按ALT+F8运行宏。大概10多秒吧，就好了。
8. Excel怎么破解密码
1、把Excel文件的扩展名xlsx修改为Rar。瞬间Excel文件变成了压缩包。（不如果不显示后辍 ，选中工具栏中的文件扩展名选项）
2、双击打开压缩包，找到 xl - Worksheets,把受保护的工作表sheet1.xml 拖动复制出来。
3、用记事本打开sheet1.xml文件，搜protect快速找到保护代码并删除，保护后把文件拖回到压缩包中。
4、重新把后辍名由rar改回xlsx，打开excel文件后发现工作表保护密码已删除。 有人会问，excel文件的打开密码能不能也用这么方式破解？不可以。07以后的Excel版本已采用了更安全的加密方式。不是专业人员是无法破解的。
9. excel vba破解
如果知道密码的话，按快捷键ALT+F11.进入VBA界面去删除。如果不知道密码的话，可以用一些工具或者用宏程序去暴力破解。工具我知道的现在EXCEL必备工具箱比较好用
10. 破解excel vba密码
方法如下：
1.首先我们打开一个工作样表作为例子。
2.我们使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：
Sub UsePassword()
Dim wb As Workbook
Set wb = Application.ActiveWorkbook
wb.Password = InputBox("请输入密码:")
wb.Close
End Sub
3.我们首先声明wb为工作薄对象，并将其赋值为对象应用程序为活动工作薄。这里其实是为了简写所以声明一个变量，可以直接使用对象的password方法进行设置。
4.也就是说Application.ActiveWorkbook.password 与wb.password是等价的。我们使用inputbox来输入密码，并运行下一步保存。
5.这里运行代码会弹出输入框，输入的密码是明文显示，我们点击确定后，Excel工作薄关闭。
6.重新打开该工作薄，弹出输入密码对话框，我们需要输入正确的密码才能打开工作薄进行工作。
7.如果需要解除密码，我们在文件-信息中找到保护工作薄选项，然后点击密码保护去掉其中的密码即可解密。
拓展资料
Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具，再加上成功的市场营销，使Excel成为最流行的个人计算机数据处理软件。
在1993年，作为Microsoft Office的组件发布了5.0版之后，Excel就开始成为所适用操作平台上的电子制表软件的霸主。
Microsoft Office是一套由微软公司开发的办公软件套装，它可以在Microsoft Windows、Windows Phone、Mac系列、iOS和Android等系统上运行。
与其他办公室应用程序一样，它包括联合的服务器和基于互联网的服务。从2007版的Office被称为“Office System”而不叫“Office Suite”，反映出它们包括服务器的事实。
Office最初是一个推广名称，出现于1990年代早期，指一些以前曾单独发售的软件的合集。当时主要的推广重点是：购买合集比单独购买要省很多钱。最初的Office版本包含Word、Excel和PowerPoint。
11. excel vba密码
不用给VBA代码就可以保护你的VBA代码啦~
第一种：在VBE窗口中单击菜单“工具”->“VBAProject属性”->“保护”->勾选“查看时锁定工程”输入密码->确认密码。保存关闭后重新打开就行了。
还有一种就是“工程不可查看”，先试一下第一种，不行再HI我。
- 相关评论
- 我要评论
-