1、快捷键A1t F11打开vbe编辑器→插入菜单
2、选择“插入”模块
3、把下面的代码复制过去→然后把光标点到代码里→F5运行一下→工作表保护就破解了。
Sub 破解工作表密码()
For x = 1 To Sheets.Count
Sheets(x).Protect AllowFiltering:=True
Sheets(x).Unprotect
Next x
End Sub
1、快捷键A1t F11打开vbe编辑器→插入菜单
2、选择“插入”模块
3、把下面的代码复制过去→然后把光标点到代码里→F5运行一下→工作表保护就破解了。
Sub 破解工作表密码()
For x = 1 To Sheets.Count
Sheets(x).Protect AllowFiltering:=True
Sheets(x).Unprotect
Next x
End Sub