sub protectemall()
for each ws in worksheets
ws.protect
next ws
end sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Donnah" wrote in message
...
Is there any way to protect more than one worksheet at a time without have
to
right click on each worksheets tab and choose 'Protect Sheet'?