Thy this:

Sub protectsheets()
For Each sht In Worksheets
sht.Protect
Next sht
End Sub

Dan

"wildauk" wrote:

Hi, I want to protect all my sheets but I have 255 in the workbook Is there
any way I can protect them all at once or do I have to do them one at a
time.I tried protecting the workbook but I could still change cells I wanted
to protect.


thanks in avance,
Wildauk.