解除工作表密碼保護(hù)
1、查看代碼
步驟：右鍵【sheet1】-【查看代碼】-打開(kāi)代碼窗口。
gifcode.gif
2、插入代碼
代碼：
Sub DeletePW()
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=True
ActiveSheet.Unprotect
End Sub
步驟：粘貼代碼，點(diǎn)擊【運(yùn)行】即可。
