excel工作表密码保护,VBA秒破解-excel文件密码破解

昨天给大家分享了怎么利用修改后缀名破解工作表保护,但是还是有很多同学操作后不能实现效果,那么今天给大家分享一段VBA代码来破解工作表保护。


代码:

Sub 破解()

ActiveSheet.Protect DrawingObjects:=True, CONTENTS:=True, AllowFiltering:=True

ActiveSheet.Protect DrawingObjects:=False, CONTENTS:=True, AllowFiltering:=True

ActiveSheet.Unprotect

End Sub

  1. 复制上方代码来到开发工具选项卡(没有开发工具选项卡的同学,在文件-选项-自定义功能区调出来)excel工作表密码保护,VBA秒破解

2. 然后点击Visual Basic 进入代码窗口 (或者按快捷键 ALT+F11)excel工作表密码保护,VBA秒破解

3. 在插入选项卡插入一个模块,然后把刚才复制的代码粘贴到模块里excel工作表密码保护,VBA秒破解

4. 选中所保护的工作表任意单元格,点击模块上方的运行-运行子过程(或者按F5运行代码)excel工作表密码保护,VBA秒破解

5. 之后会弹出输入密码的对话框,点击取消 就破解工作表保护了excel工作表密码保护,VBA秒破解

整体效果:

excel工作表密码保护,VBA秒破解

推荐阅读