You could add two routines to your workbook:

sub protect_all_sheets()
for each w in thisworkbook.worksheets
w.protect password:="Popcorn"
next
end sub

sub unprotect_all_sheets()
for each w in thisworkbook.worksheets
w.unprotect password:="Popcorn"
next
end sub



Col


--
colofnature
------------------------------------------------------------------------
colofnature's Profile: http://www.excelforum.com/member.php...o&userid=34356
View this thread: http://www.excelforum.com/showthread...hreadid=547518