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