1、打开保护Excel的文档;
2、按ALT+F11或选择开发工具-Visual Basic进入VBA窗口
3、选中工作簿对象-右键-插入模块
4、选中模块-模块1
5、复制以下代码到右上方
Sub 工作簿密码破解() ActiveWorkbook.Sheets.Copy
For Each sh In ActiveWorkbook.Sheets sh.Visible = True Next
End Sub
Sub 工作表密码破解()
Dim sht As Worksheets
For Each sht In Worksheets sht.Protect AllowFiltering:=True sht.Unprotect Next End Sub
6、关闭VBA窗口
7、按ALT+F8或选择开发工具-宏
8、选择宏执行
新人,请支持!