破解excel密码宏程序代码.docVIP

将你要破解的Excel文件关闭，切记一定要关闭呀！然后新建一个Excel文件 打开新建的这个Excel，按下alt+F11，打开vb界面，新建一个模块，如图所示 将代码复制到这个模块中，代码如下：Private Sub VBAPassword() 你要解保护的Excel文件路径Filename = Application.GetOpenFilename(Excel文件（*.xls *.xla *.xlt）,*.xls;*.xla;*.xlt, , VBA破解)If Dir(Filename) = ThenMsgBox 没找到相关文件,清重新设置。Exit SubElseFi