使用方法,保存下面的代码作为宏,然后运行一下。步骤:随便录制一段宏,然后修改,然后运行。
Sub 撤销工作表保护()ActiveSheet.Protect DrawingObjects:=True, CONTENTS:=True, AllowFiltering:=TrueActiveSheet.Protect DrawingObjects:=False, CONTENTS:=True, AllowFiltering:=TrueActiveSheet.UnprotectEnd Sub
使用方法,保存下面的代码作为宏,然后运行一下。步骤:随便录制一段宏,然后修改,然后运行。
Sub 撤销工作表保护()ActiveSheet.Protect DrawingObjects:=True, CONTENTS:=True, AllowFiltering:=TrueActiveSheet.Protect DrawingObjects:=False, CONTENTS:=True, AllowFiltering:=TrueActiveSheet.UnprotectEnd Sub
本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如若转载,请注明出处:http://www.hqwc.cn/news/864163.html
如若内容造成侵权/违法违规/事实不符,请联系编程知识网进行投诉反馈email:809451989@qq.com,一经查实,立即删除!