如果你只有打开密码,且密码是7位数以内的数字,可用以下步骤解开:\x0d\x0a新开一Excel,打开,记住文件路径,取消。然后把你待解密文件copy到这一路径,改名为1.xls。然后回到Excel窗口,同时按键盘的Alt和F11,右键点左上窗口中的VBAProject,插入,模块,在右边新出来的窗口粘贴一下代码\x0d\x0aSub crack()\x0d\x0aDim i As Long\x0d\x0ai = 1\x0d\x0aline2:\x0d\x0aOn Error GoTo line1\x0d\x0aDo While True\x0d\x0aWorkbooks.Open "1.xls", , , , i\x0d\x0aWorkbooks("1.xls").Close 0\x0d\x0aMsgBox "Password is" & i\x0d\x0aExit Sub\x0d\x0aLoop\x0d\x0aline1:\x0d\x0ai = i + 1\x0d\x0aResume line2\x0d\x0aEnd Sub\x0d\x0a\x0d\x0a然后运行此宏(回到Excel窗口,工具,宏,宏,DefineHyperlink,运行)\x0d\x0a\x0d\x0a如果有字母,稍微复杂些,道理是一样的。太长的密码,基本解不开了。\x0d\x0a\x0d\x0a若果还有读写密码,且与打开密码一样,将Workbooks.Open "1.xls", , , , i改为Workbooks.Open "1.xls", , , , i, i
温馨提示:答案为网友推荐,仅供参考