excel密码忘记了,如何打开?
excel密码忘记了打开方法:
1、首先开启excel文件点击撤销工作簿保护时忘记密码的情况,如图。
2、这时就可以右键文件,开启右键菜单列表,如图
3、点击重命名把文件后缀改成rar,如图。
4、改成完rar使用压缩应用打开这个rar文件,如图。
5、然后打开xl目录下的worksheets文件夹,如图。
6、右键sheet1.xml,开启右键菜单列表,如图。
7、点击用记事本打开,开启记事本界面,如图。
8、然后找到文本中的sheetProtection,把图中选中的内容删除,如图。
9、然后关闭保存这时会提示文件被修改了,点击确定就可以了,如图。
10、最后再把文件后缀重新修改成excel的后缀。
11、然后就可以打开excel文件了,如图。
1、首先将excel表格的文件后缀名 .xlsx更改为 .rar。
2、通过压缩文件打开这个表格,并找到下面的路径,xl——worksheets——sheet1.xml。
3、在压缩文件里的sheet1.xml文件拖出来。
4、用记事本方式将.sheet1.xml文件打开,然后搜索,“protection”,将这段代码删除。即<sheetprotection.........="0"/>这一段。
5、把已经修改后的sheet1.xml文件,拖拽到压缩的工作蒲中,然后选择替换,确认即可。
6、把文件名称,“演示操作表格.rar”重新更改“演示操作表格.xlsx”,这样就可以将之前设置的密码取消了。excel表格就可以正常打开了。
注意事项:
如果时间长了,忘记密码。可以再网上搜索破解excel、word的密码软件进行解密。
新开一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
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