password protecting worksheet

M

MelB

I have a workbook with seven worksheets. I would like to create a unique
password for each of the seven worksheets within the workbook. Is this
possible, if so how is it done?
 
M

Mike H

Hi,

Simply select each of the sheets in turn and then:-

Tools|Protection|Protect worksheet

Enter a password which can be different for each sheet.

Mike
 
G

Gord Dibben

Either protect each sheet manually or use this macro.

With a list of passwords in first sheet in A1:A7

Sub ProtectAllSheets()
Application.ScreenUpdating = False
Dim n As Single
For n = 1 To Sheets.Count
Sheets(n).Protect Password:=Sheets(1).Cells(n, 1).Value
Next n
Application.ScreenUpdating = True
End Sub


Gord Dibben MS Excel MVP
 
Top