Add protect worksheet password in macro

[Kelly]

I created 43 sets of workbooks that need to be locked and protected from end
users. I have created a macro that will clear the previos days numbers and
copies on cell to another which are both locked. My macro won't run with
those two cells being locked. I tried to create a macro that unprotects the
worksheet, does all actions needed then protects the worksheet again. When I
run the macro the first thing that pops up is the password entry box. It
didn't put the password I entered in the code. Can I add the password to it
and if so how? I'm new at writing macros and code in Excell.

 

[Paul B]

Kelly, here is one way,

Const PW As String = "123" 'Change Password Here
ActiveSheet.Unprotect Password:=PW
'you code here
ActiveSheet.Protect Password:=PW


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003