Chi, you can with a macro

Sub Unprotect_All_Sheets()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
ws.Unprotect password:="123" 'change password here
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


"Chi" wrote in message
...
Hi,

I have a workbook that has many worksheets. All worksheets are protected
with the same password. Is there a way that I can unprotect them all at
once
instead of unprotect each sheet at per time?
Please help.

Thanks
Chi