1、查看代码步骤:右键【sheet1】-【查看代码】-打开代码窗口。
2、插入代码代码:Sub DeletePW()ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=TrueActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=TrueActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=TrueActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=TrueActiveSheet.UnprotectEnd Sub步骤:粘贴代码,点击【运行】即可。
从此再也不怕忘记密码了有木有,快快收藏学习吧~
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)