EXCEL工作表保护密码破解
1、视图—宏—录制新宏—输入宏名，随便输入，如:aa<img class="aligncenter size-full wp-image-1459" title="1" src="http://www.oicto.com/wp-content/uploads/2014/05/1.jpg" alt="" width="480" height="269" />
2、停止录制，得到一个空宏
<img class="aligncenter size-full wp-image-1460" title="2" src="http://www.oicto.com/wp-content/uploads/2014/05/2.jpg" alt="" width="480" height="269" />
3、继续 视图—宏—查看宏—选aa（aa为之前新建的宏）—点击编辑按钮
<img class="aligncenter size-full wp-image-1461" title="3" src="http://www.oicto.com/wp-content/uploads/2014/05/3.jpg" alt="" width="480" height="269" />
4、删除窗口中的所有字符，复制下面的内容粘贴。一个字母、标点符号都不能少。
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
<img class="aligncenter size-full wp-image-1462" title="4" src="http://www.oicto.com/wp-content/uploads/2014/05/4.jpg" alt="" width="480" height="269" />
5、关闭编辑窗口
6、视图—宏—查看宏,选AllInternalPasswords，点击执行，确定两次，等2分钟，再确定。密码撤销完毕。
<img class="aligncenter size-full wp-image-1463" title="6.1" src="http://www.oicto.com/wp-content/uploads/2014/05/6.1.jpg" alt="" width="235" height="207" /><img class="aligncenter size-full wp-image-1464" title="6.2" src="http://www.oicto.com/wp-content/uploads/2014/05/6.2.jpg" alt="" width="235" height="75" />
<img class="aligncenter size-full wp-image-1465" title="6.3" src="http://www.oicto.com/wp-content/uploads/2014/05/6.3.jpg" alt="" width="480" height="222" />
查看完整版本： EXCEL工作表保护密码破解
Tags: