如果你只有打开密码,且密码是7位数以内的数字,可用以下步骤解开:新开一Excel,打开,记住文件路径,取消。然后把你待解密文件copy到这一路径,改名为1.xls。然后回到Excel窗口,同时按键盘的Alt和F11,右键点左上窗口中的VBAProject,插入,模块,在右边新出来的窗口粘贴一下代码Sub crack()Dim i As Longi = 1line2:On Error GoTo line1Do While TrueWorkbooks.Open "1.xls", , , , iWorkbooks("1.xls").Close 0MsgBox "Password is" & iExit SubLoopline1:i = i + 1Resume line2End Sub然后运行此宏(回到Excel窗口,工具,宏,宏,DefineHyperlink,运行)如果有字母,稍微复杂些,道理是一样的。太长的密码,基本解不开了。若果还有读写密码,且与打开密码一样,将Workbooks.Open "1.xls", , , , i改为Workbooks.Open "1.xls", , , , i, i一般密码不是非常复杂是完全可以破解的,前提是你没把文件损坏!不然就算我拿到你文件也帮不到你,最好能想起大概用的密码组合那样方便我们破解上网搜一下word 或excel密码破解软件,大把的
4,excel的密码忘记了怎么破解方法
为了保护个人隐私,我们通常会设置密码,对于办公软件也不例外,但是记性不好的朋友往往会将自己设置的密码忘记,如果excel密码忘记了怎么办呢?下面就是excel表格文件忘记密码的解决方法哦~ 首先我们在网上下载一个Office Password Remover,运行解压好的OPRemove.exe 这个程序,打开程序后可以看到中间文本框后面有个类似文件夹的按钮,点击它浏览打开要破解的文档, 选择后点击移除密码,这时软件会提示需要连接到Internet,因为要给该软件的服务器发送数据并解密。 不过大家可以放心,软件不会泄露任何个人隐私,过几秒钟后便出现“该文档已经被成功破解”,点确定即可,这时候就大功告成了。如果密码是6位数以内的数字,可用以下步骤解开(关掉所有程序,为了速度): 新开一excel,同时按alt和f11,进入vba界面,点菜单上的插入,模块,在新出来的窗口粘贴一下代码: sub crack() 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 然后在此界面直接按f5运行此宏,选择你的文件,等啊等(看密码长度了)