ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   Add protect worksheet password in macro (https://www.excelbanter.com/excel-worksheet-functions/64118-add-protect-worksheet-password-macro.html)

Kelly

Add protect worksheet password in macro
 
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.
--
Thank you, Kelly

Paul B

Add protect worksheet password in macro
 
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

"Kelly" wrote in message
...
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.
--
Thank you, Kelly





All times are GMT +1. The time now is 05:41 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com