excel文档加密忘记密码怎么办

发布网友 发布时间：2022-03-03 07:39

我来回答

共3个回答

懂视网 时间：2022-03-03 12:00

产品型号：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-03 09:08

热心网友 时间：2022-03-03 10:26

您好，很高兴为您解答。开启excel文件点击撤销工作簿保护时忘记密码的情况，如图

点击重命名把文件后缀改成rar

改成完rar使用压缩应用打开这个rar文件

然后打开xl目录下的worksheets文件夹

右键sheet1.xml，开启右键菜单列表，点击用记事本打开，开启记事本界面

回答

回答稍等

提问好的

回答新建一个excel文档，然后打开，同时按Alt和F11，进入VBA界面

提问

Dim i As Long

Dim FileName As String

i = 0

FileName = Application.GetOpenFilename("Excel文件（*.xls & *.xlsx）,*.xls;*.xlsx", , "VBA破解")

FileName = Right(FileName, Len(FileName) - InStrRev(FileName, "\"))

Application.ScreenUpdating = False

line2: On Error GoTo line1

Workbooks.Open FileName, , True, , i

MsgBox "Password is " & i

Exit Sub

line1: i = i + 1

Resume line2

Application.ScreenUpdating = True

End Sub

提问你们能不能远程帮忙弄一下

回答很抱歉没办法的