Obnovení nastavení/zobrazení tlačítek menu , Excel 2007 Vyřešeno

[claxon]

Zdravím,
prosím o pomoc. Potřeboval jsem deaktivovat tlačítko "smazat..." v nabídce při kliknutím pravého tl. myši.
Použil jsem následující makro, které ho však smazalo úplně:

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
Dim cmdBCntrl As CommandBarControl
Dim pos As Integer
On Error Resume Next
Sh.Protect UserInterFaceOnly:=True
With Application.CommandBars("Cell")
pos = .Controls("Delete...").Index
Set cmdBCntrl = .Controls.Add(Before:=pos, Temporary:=True)
.Controls("Delete...").Delete
End With
On Error GoTo 0
End Sub

Potřeboval bych však toto tlačítko opět zobrazit, ale nemůžu nikde najít, jak toto provést.
Přikládám obrázek, kde toto tlačítko chybí.
Předem děkuju za odpověď.

[Reklama]

[X]

Pokud se nepletu, tak stačí zastavit tu rutinu VBA.

[claxon]

To makro už v tom sešitu vůbec nemám. Nepomohlo ani přeinstalování MS Office.

[guest]

Zkuste nejdřív

Kód: Vybrat vše

Application.CommandBars("Cell").Reset

[Luboš]

Možná ti pomůže tento návod (v angličtině), anebo tento a další na netu - je jich tam spousta.

[claxon]

Zkuste nejdřív

Kód: Vybrat vše

Application.CommandBars("Cell").Reset

Děkuji mnohokrát. Pomohlo. Označuji za vyřešené.