撤销工作表保护 撤销工作表保护不知道密码怎么办

综合百科 2024-07-24 09:51:22

关于撤销工作表保护,撤销工作表保护不知道密码怎么办这个很多人还不知道,今天天天来为大家解答以上的问题,现在让我们一起来看看吧!

撤销工作表保护 撤销工作表保护不知道密码怎么办撤销工作表保护 撤销工作表保护不知道密码怎么办


1、二、当对Excel工作表进行保护作后,不慎忘记了保护密码,导致无法编辑工作表,那么就要撤销密码保护。

2、用宏代码密码:以off2007为例说明,(2003也是一样的,只是菜单命令的位置不同)步:打开该文件,先解除默认的“宏禁用”状态,方法是点击工具栏下的“选项”状态按钮,打开“Microsoft Off安全选项”窗口,选择其中的“启用此内容”,“确定”退出;再切换到“视图”选项卡,点击“宏”→“录制宏”,出现“录制新宏”窗口,在“宏名”定义一个名称为:PassWordBreaker,点击“确定”退出;第二步:再点击“宏”→“查看宏”,选择“PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _宏名”下的“PasswordBreaker”并点击“编辑”,打开“Microsoft Visual Basic”编辑器,用如下内容替换右侧窗口中的所有代码:Sub PasswordBreaker()Dim i As Integer, j As Integer, k As IntegerDim l As Integer, m As Integer, n As IntegerDim i1 As Integer, i2 As Integer, i3 As IntegerDim i4 As Integer, i5 As Integer, i6 As IntegerFor 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 66ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _If ActiveSheet.ProtectContents = False ThenMsgBox "One usable password is " & Chr(i) & Chr(j) & _Chr(k) & Chr(l)有两种情况,一是你知道工作表保护的密码,另一种是你不知道。

3、 & Chr(m) & Chr(i1) & Chr(i2) & _ActiveWorkbook.Sheets(1).SelectRange("a1").FormulaR1C1 = Chr(i) & Chr(j) & _Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _End Sub第三步:再点击“宏”→“查看宏”,选择“宏名”下的“PasswordBreaker”并点击“执行”,密码就现形了。

4、请添加详细解释。

本文到这结束,希望上面文章对大家有所帮助。

版权声明:本文内容由互联。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请发 a13828211729@163.com 邮箱删除。