EXCEL如何撤销对工作表的保护

使用方法，保存下面的代码作为宏，然后运行一下。步骤：随便录制一段宏，然后修改，然后运行。

Sub 撤销工作表保护()

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

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

ActiveSheet.Unprotect

End Sub