excel
如果你只有打开密码，且密码是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 "pass
word is" & iexit subloopline1:i = i + 1resume line2end sub
然后运行此宏（回到excel窗口，工具，宏，宏，definehyperlink，运行）
如果有字母，稍微复杂些，道理是一样的。太长的密码，基本解不开了。
VBA
若果还有读写密码，且与打开密码一样，将workbooks.open "1.xls", , , , i改为workbooks.open "1.xls", , , , i, i
