爱科伦
您现在的位置: 首页 > 实用分享

实用分享

excel表格加密怎么取消

清心 2024-07-26 20:02:15 实用分享

在Excel中,我们可以对表格和工作簿进行加密以保护数据的安全性。但是有时候我们需要取消加密,以便对表格进行修改或共享。小编将介绍如何取消Excel表格和工作簿的加密,以及一些常见问题的解答。

1. 取消工作表保护

要取消Excel表格的保护,按照以下步骤进行:

  1. 在Excel中打开被保护的工作表。
  2. 单击右键,选择“取消工作表保护”。
  3. 如果工作表被设置了密码,需要输入正确的密码才能取消保护。
  4. 完成以上步骤后,工作表的保护将被取消,可以对其进行修改和编辑。

2. 取消工作簿保护

要取消Excel工作簿的保护,按照以下步骤进行:

  1. 在Excel中打开被保护的工作簿。
  2. 单击右键,选择“取消工作簿保护”。
  3. 如果工作簿被设置了密码,需要输入正确的密码才能取消保护。
  4. 完成以上步骤后,工作簿的保护将被取消,可以对其中的工作表进行删除、移动、新建、隐藏或者取消隐藏,以及工作表重命名等操作。

3. 忘记工作簿保护密码

如果你忘记了Excel工作簿的保护密码,可以按照以下步骤进行:

  1. 右键单击工作表标签,选择“查看代码”。
  2. 在打开的Visual Basic编辑器中,选择“插入”->“模块”。
  3. 在新建的模块中输入以下代码:
  4. Sub PasswordBreaker()

    Dim i As Integer, j As Integer, k As Integer

    Dim l As Integer, m As Integer, n As Integer

    Dim i1 As Integer, i2 As Integer, i3 As Integer

    Dim i4 As Integer, i5 As Integer, i6 As Integer

    On Error Resume Next

    For i = 65 To 66: For j = 65 To 66: For k = 65 To 66

    For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66

    For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66

    For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126

    ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _

    Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _

    Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

    If ActiveSheet.ProtectContents = False Then

    MsgBox "One usable password is " & Chr(i) & Chr(j) & _

    Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _

    Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

    Exit Sub

    End If

    Next: Next: Next: Next: Next: Next

    Next: Next: Next: Next: Next: Next

    End Sub
  5. 点击运行按钮,等待程序运行完成。
  6. 如果存在可用的密码,程序将显示出来。
  7. 使用显示的密码取消工作簿的保护。

取消Excel表格和工作簿的加密是一个非常简单的操作,只需要根据步骤进行即可。如果遇到忘记密码的情况,也可以通过插入宏代码的方式进行破解。但是请注意,在取消加密之前,请确保已经备份了重要的数据,以免数据丢失。