如何破解EXCEL工作表保护密码忘记密码怎么办 如何破解EXCEL工作表保护密码忘记密码怎么办 如何破解EXCEL工作表保护密码忘记密码怎么办 如何破解EXCEL工作表保护密码忘记密码怎么办 新建一个EXCEL工作表,而后点击另存为,讲表格保存为启用宏的工作表 一次点击开发工具---录制新宏,在弹出的对话框内修改宏名称而后确定 依次点击开发工具----停止录制宏,宏录制完成 如何破解EXCEL工作表保护密码忘记密码怎么办 如何破解EXCEL工作表保护密码忘记密码怎么办 如何破解EXCEL工作表保护密码忘记密码怎么办 依次点击开发工具,---宏----在弹出的对话框找到我们刚才录制的宏名称而后进入VBA界面 在VBA界面,全选里面的代码,而后删除,讲里面的代码全部删除完 如何破解EXCEL工作表保护密码忘记密码怎么办 如何破解EXCEL工作表保护密码忘记密码怎么办 如何破解EXCEL工作表保护密码忘记密码怎么办 代码复制到VBA编辑窗口内 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