Unless you are running Excel 24/7, the only way is to open the workbook whose worksheets you want to protect and then run this macro:
<pre>Sub ProtectMe()
Dim ws As Excel.Worksheet
For Each ws In Worksheets
ws.Protect Password:="password1"
Next ws
End Sub</pre>
Of course you would substitute your real password for "password1".
HTH,
JP
Last Wiki Answer Submitted: April 8, 2008 12:02 pm by JP2112475 pts.
If you live outside the United States, by submitting your email address you consent to having your personal data transferred to and processed in the United States.