Sub MyMacro()
On Error goto ErrHandler
worksheets("Sheet1").Unprotect Password:="ABC"
' current code

ErrHandler:
Worksheets("sheet1").Protect Password:="ABC"
End Sub

--
Regards,
Tom Ogilvy


"WLMPilot" wrote:

I have run into a problem with macros not executing when a sheet is protected
in Excel. I use Office XP.

Any ideas on this?

Thanks,
Les