Locking Sheet Tabs

  • Thread starter Thread starter Guest
  • Start date Start date
Hi,

I'm not sure I understand your terminology -"Lock sheet tab", what do you
mean?

Mike
 
What do you mean by this?

Placing sheet protection on more than one worksheet?

One at a time or with VBA you can do all or those in a selected group of sheets.

Sub ProtectAllSheets()
Application.ScreenUpdating = False
Dim n As Single
For n = 1 To Sheets.Count
Sheets(n).Protect Password:="justme"
'Sheets(n).UnProtect Password:="justme"
Next n
Application.ScreenUpdating = True
End Sub


Sub Protect_Selected_Sheets()
Set MySheets = ActiveWindow.SelectedSheets
For Each ws In MySheets
ws.Select
ws.Protect Password:="justme"
'ws.UnProtect Password:="justme"
Next ws
End Sub


Gord Dibben MS Excel MVP
 
Back
Top