Protect a few sheets
 

Hi all,

I hace 10 sheets in a workbook.

out of it I have to protect five sheets in my Auto_Open
Macro
Say Sheet1, sheet4, sheet5, sheet9 and sheet 10
Hi all,

what would be the Easy coding for this rather
sheets("Sheet1").protect
EnableSelection = xlUnlockedCells
sheets("Sheet4").protect
EnableSelection = xlUnlockedCells
sheets("Sheet5").protect
EnableSelection = xlUnlockedCells


and so on..

TIA
Soniya
sheets("Sheet1").protect