Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Can I protect all excel tabs in a file with one password entry
Does the address of the range change for each sheet?
ladytiger7481 wrote: I am looking to be able to do this as well. I was able to use the coding above to lock all worksheets at one time but I haven't been able to add the allow-users-to-edit-ranges. Can someone please help me? "EugeniaP" wrote: Does anyone know how to incorporate the allow-users-to-edit-certain-ranges part into this protection macro? Thank you! "Dave Peterson" wrote: Your code worked fine for me. Did you create another sub or function and name it Unprotect? If you did, then change the name of that sub/function to something else. Jen@ccbcc wrote: Sub Protect_All_Sheets() Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets ws.Protect Password:="123" Next ws End Sub Sub Unprotect_All_Sheets() Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets ws.Unprotect Password:="123" Next ws End Sub Each time I attempt to run the unprotect macro, I receive an error which points to the line "ws.Unprotect Password:="123" "Dave Peterson" wrote: If you protect the sheets without supplying a password, then the code won't need to use a password, either. But if you use a password manually, you'll need it in code, too. I think you made a typo when you made that suggested change. Post your current code and indicate the line that caused the error. Jen@ccbcc wrote: If I simply replace the protect with unprotect, I receive the following error message: Compile error: Expected function or variable Also...is there a way to perform these macros without requiring a password? "Dave Peterson" wrote: Just use ws.unprotect password:="123" to unprotect the sheets. They all share the same password, right? Jen@ccbcc wrote: Does anyone know how to do the reverse (i.e. unprotect all sheets at once)? "Paul B" wrote: Indiana, you can use a macro like this, Sub protect_sheets() Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets ws.Protect password:="123" Next ws End Sub -- 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 "Indiana born" <Indiana wrote in message ... I have spreadsheets with multiple tabs - I presently have to password protect each tab separately. I'm looking for a way to protect all tabs with one password entry. i am not share the files, but others do view them and I don't want changes made. -- Dave Peterson -- Dave Peterson -- Dave Peterson -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
I have a excel file and forgot the password | Excel Discussion (Misc queries) | |||
Excel file automatically opens | Excel Discussion (Misc queries) | |||
Remove or change password protected excel file | Excel Discussion (Misc queries) | |||
password protection of an MHTML Excel file | Excel Discussion (Misc queries) | |||
How Do I open an excel file without Excel Viewer support | Excel Discussion (Misc queries) |