Locking all Spreadsheets together

Hi,
I have many spreadsheets and I wish to lock all of them, it is very
difficult for me going through all of them every time I need to change
anything.
Locking whole workbook doesnt let me use options i need to use.

Is there any other easy way ?

piotr, if you are talking about worksheets in a workbook you could use a
macro like this to protect and unprotect them

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


--
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

"Piotr" <hokah@wp.pl> wrote in message
news:1131530272.025125.3080@g47g2000cwa.googlegroups.com...
> Hi,
> I have many spreadsheets and I wish to lock all of them, it is very
> difficult for me going through all of them every time I need to change
> anything.
> Locking whole workbook doesnt let me use options i need to use.
>
> Is there any other easy way ?
>

Thank you for your help, you have saved me a lot of WORK ...

Your welcome


--
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

"Piotr" <hokah@wp.pl> wrote in message
news:1131546147.877409.180770@g43g2000cwa.googlegroups.com...
> Thank you for your help, you have saved me a lot of WORK ...
>