您的位置首页 >精选问答 >

表格忘记密码怎么找回简单(表格忘记密码怎么打开)

导读 您好,今天芳芳来为大家解答以上的问题。表格忘记密码怎么找回简单,表格忘记密码怎么打开相信很多小伙伴还不知道,现在让我们一起来看看吧!

您好,今天芳芳来为大家解答以上的问题。表格忘记密码怎么找回简单,表格忘记密码怎么打开相信很多小伙伴还不知道,现在让我们一起来看看吧!

1、如果表格被保护了,即开着,但是不能改动,且密码是7位数以内的数字,如下操作:在Excel窗口,同时按键盘的Alt和F11,点菜单上的插入,模块,在右边新出来的窗口粘贴一下代码:Sub crackProtect()Dim i As Longi = 1line2:On Error GoTo line1Do While True***.unprotect iMsgBox "Password is" & iExit SubLoopline1:i = i + 1Resume line2End Sub然后按F5运行此宏。

2、如果有字母,稍微复杂些,道理是一样的。

3、太长的密码,基本解不开了。

4、如果Excel文件的打开密码忘记了,且密码是7位数以内的数字,可用以下步骤解开:新开一Excel,同时按Alt和F11,进入VBA界面,点菜单上的插入,模块,在新出来的窗口粘贴一下代码:Sub crack()Dim i As LongDim FileName As String***.screenupdating = Falsei = 1FileName = ***.getopenfilename("Excel文件(*.xls & *.xlsx),*.xls;*.xlsx", , "VBA破解")FileName = Right(FileName, Len(FileName) - InStrRev(FileName, ""))line2:On Error GoTo line1Do While True***.open FileName, , , , iWorkbooks(FileName).Close 0MsgBox "Password is " & iExit SubLoopline1:i = i + 1Resume line2***.screenupdating = TrueEnd Sub然后按F5运行此宏如果有字母,稍微复杂些,道理是类似的。

5、太长的密码,基本解不开了。

6、若果还有读写密码,且与打开密码一样,将***.open FileName, , , , i 改为***.open FileName, , , , i, i。

本文就为大家分享到这里,希望小伙伴们会喜欢。

标签:

免责声明:本文由用户上传,如有侵权请联系删除!