In Excel, I used the following code to remove Protect Sheet... option from Tools | Protection menu.
Sub Delete_Item_on_Submenu()
Set x = CommandBars("Tools".Controls("Protection"
x.Controls("Protect Sheet...".Delete
End Sub
However, I can't get it back now. The code I used to attempt and get it back is:
Sub Restore_Item_on_Submenu()
Set x = CommandBars("Tools".Controls("Protection"
x.Controls.Add Type:=msoControlButton, ID:=30029, before:=1
End Sub
My reference code came from
Can anyone please tell me how to get this back???
Thanks.
Mike
Sub Delete_Item_on_Submenu()
Set x = CommandBars("Tools".Controls("Protection"
x.Controls("Protect Sheet...".Delete
End Sub
However, I can't get it back now. The code I used to attempt and get it back is:
Sub Restore_Item_on_Submenu()
Set x = CommandBars("Tools".Controls("Protection"
x.Controls.Add Type:=msoControlButton, ID:=30029, before:=1
End Sub
My reference code came from
Can anyone please tell me how to get this back???
Thanks.
Mike