I'm a VBA beginner, however I have fixed a similar problem with the
following.
Sub Your_Procedure
ActiveWorkbook.Sheets("Your sheet name").Unprotect (YourPassword)
YourCode
ActiveWorkbook.Sheets("Your sheet name").Protect (YourPassword)
End Sub
---
Message posted from
http://www.ExcelForum.com/