View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.misc
Win XP
 
Posts: n/a
Default Disable Tools Protection Protect Sheet for all users but one

From other post I realize that you disable the menu item by:
Application.CommandBars("Tools").Controls("Protect ion").Enabled = False
but, I want to disable it for everyone unless you log on as Administrator.
I have tried the following, but it does not work.
Private Sub Workbook_Open()
If Application.UserName < "Administrator" Then
Application.CommandBars("Tools").Controls("Protect ion").Enabled = False
End If
End Sub
I cannot find the solution from other posts