秒破工作表保护密码
相信大家在平常的工作当中有时候会对工作表进行保护,并设置保护密码,防止其他人修改自己的工作表内容。但随之而来的问题是忘记密码了,这样连自己都撤销不了工作表保护了,面对这种情况有两种方法:
一、复制被保护表的内容,粘贴到新工作表中,然后删掉原工作表,听起来不错吧,只是如果原表中有图片啥的,你无法复制。这就不太完美了。
二、VBA代码破解
例如,当前工作表设置了保护,如果直接进行编辑会弹出如下的提示框:
1、在【开发工具】下选择【Visual Basic】:
2、新建一个模块,并输入如下代码:
附上代码:
Sub 破解工作表保护密码()
ActiveSheet.Protect AllowFiltering:=True
ActiveSheet.Unprotect
MsgBox "破解完成"
End Sub
3、点击运行按钮就可:
结果:
那么这个时候我们就破解了原有工作表的密码啦。
赞 (0)