excel表格锁后忘记了密码，怎样找回或打开电子表格？
发布网友
发布时间：2022-03-02 11:46
共3个回答
懂视网
时间：2022-03-02 16:08
产品型号：ASUS S340MC
系统版本：Windows 10
软件版本：Microsoft Office Excel 2019
excel忘记密码是无法找回的，但可以删除加密数据，来解锁excel文件，具体操作如下：
1、首先选中被加密的excel文件，按F2键把文件后缀名改为rar。
2、然后双击打开该压缩文件，选择打开XL文件夹。
3、接着打开worksheets文件夹，将sheet1.xml文件拖到桌面。
4、右键该文件选择使用记事本打开，按Ctrl+F键查找protection。
5、删除该词所在尖括号内的全部内容并保存，再将该文件拖回压缩包。
6、最后在弹窗中点击确定按钮，将压缩文件后缀名重新改为XLSX即可。
总结
1、首先选中被加密的excel文件，按F2键把文件后缀名改为rar。
2、然后双击打开该压缩文件，选择打开XL文件夹。
3、接着打开worksheets文件夹，将sheet1.xml文件拖到桌面。
4、右键该文件选择使用记事本打开，按Ctrl+F键查找protection。
5、删除该词所在尖括号内的全部内容并保存，再将该文件拖回压缩包。
6、最后在弹窗中点击确定按钮，将压缩文件后缀名重新改为XLSX即可。
热心网友
时间：2022-03-02 13:16
在Excel窗口，同时按键盘的Alt和F11，点菜单上的插入，模块，在右边新出来的窗口粘贴一下代码：
Sub crackProtect()
Dim i As Long
i = 1
line2:
On Error GoTo line1
Do While True
ActiveWorkbook.Unprotect i
MsgBox "Password is" & i
Exit Sub
Loop
line1:
i = i + 1
Resume line2
End Sub
然后按F5运行此宏。
如果有字母，稍微复杂些，道理是一样的。太长的密码，基本解不开了。
如果Excel文件的打开密码忘记了，且密码是7位数以内的数字，可用以下步骤解开：
新开一Excel，同时按Alt和F11，进入VBA界面，点菜单上的插入，模块，在新出来的窗口粘贴一下代码：
Sub crack()
Dim i As Long
Dim FileName As String
Application.ScreenUpdating = False
i = 1
FileName = Application.GetOpenFilename("Excel文件（*.xls & *.xlsx）,*.xls;*.xlsx", , "VBA破解")
FileName = Right(FileName, Len(FileName) - InStrRev(FileName, "\"))
line2:
On Error GoTo line1
Do While True
Workbooks.Open FileName, , , , i
Workbooks(FileName).Close 0
MsgBox "Password is " & i
Exit Sub
Loop
line1:
i = i + 1
Resume line2
Application.ScreenUpdating = True
End Sub
然后按F5运行此宏
如果有字母，稍微复杂些，道理是类似的。太长的密码，基本解不开了。
若果还有读写密码，且与打开密码一样，将Workbooks.Open FileName, , , , i 改为Workbooks.Open FileName, , , , i, i
热心网友
时间：2022-03-02 14:34
同时按键盘的Alt和F11，点菜单上的插入，模块，在右边新出来的窗口粘贴一下代码：
Sub crackProtect()
Dim i As Long
i = 1
line2:
On Error GoTo line1
Do While True
ActiveWorkbook.Unprotect i
MsgBox "Password is" & i
Exit Sub
Loop
line1:
i = i + 1
Resume line2
End Sub
然后按F5运行此宏。
如果有字母，稍微复杂些，道理是一样的。太长的密码，基本解不开了。
希望能够帮助到你
提问在运行宏之前要打开一个表格吗
回答是啊
提问随便一个表格都可以吗？
回答不是
提问能不能说的详细一点
回答选中忘记密码的表格，单击鼠标右键，选择“重命名”，将Excel的扩展名修改为“.rar”。
2.
打开压缩包，依次点击“xl”，“worksheets”。
3.
然后把有保护密码的工作表“sheet1.xml”拖出来，将工作表“sheet1.xml”用“写字板”的方式打开文件。
4
在文件里面按“Ctrl+F”查找“protect”，快速找到保护代码并删除。
5 .再把“sheet1.xml”放回压缩包里面，将扩展名改为“.xlsx”。
