秒破工作表保护密码

相信大家在平常的工作当中有时候会对工作表进行保护,并设置保护密码,防止其他人修改自己的工作表内容。但随之而来的问题是忘记密码了,这样连自己都撤销不了工作表保护了,面对这种情况有两种方法:

一、复制被保护表的内容,粘贴到新工作表中,然后删掉原工作表,听起来不错吧,只是如果原表中有图片啥的,你无法复制。这就不太完美了。

二、VBA代码破解

例如,当前工作表设置了保护,如果直接进行编辑会弹出如下的提示框:

1、在【开发工具】下选择【Visual Basic】:

2、新建一个模块,并输入如下代码:

附上代码:

Sub 破解工作表保护密码()

ActiveSheet.Protect AllowFiltering:=True

ActiveSheet.Unprotect

MsgBox "破解完成"

End Sub

3、点击运行按钮就可:

结果:

那么这个时候我们就破解了原有工作表的密码啦。

快捷查看
(0)

相关推荐