Excel - Symbolleiste gelöscht

hey ihr

ich brauch eure hilfe ... totale panik macht sich grad breit ...

ich hab ein wenig in excel experimentiert, einen eigenen button einzufügen und mit nem makro zu koppeln

der button war da, aber ich wollte ihn umbenennen, außerdem war er versehentlich 2x da, also wollte ich beide löschen.
auf dem bild seht ihr, was am ende rauskam (versehen und zu oft geklickt ... und die unerfahrenheit :D wenn die kleinen halt groß anfangen wollen ...)


ja ... wie krieg ich das alles jetzt wieder her?
und die smileys weg?

die smileys hab ich so hergezaubert:
Option Explicit

Private Sub Workbook_Activate()
Dim myMenuBar As Variant
Dim ctrl1 As Variant

Set myMenuBar = Application.CommandBars("Worksheet Menu Bar")
Set ctrl1 = myMenuBar.Controls.Add(Type:=msoControlButton, ID:=2950)
ctrl1.Caption = ""
ctrl1.TooltipText = "Alle 5 Minuten automatisch speichern"
ctrl1.OnAction = "automatisch_speichern"
End Sub

Und so wollte ich Sie wieder verschwinden lassen, aber alles andre war weg:
Private Sub Workbook_Deactivate()
Application.CommandBars("Worksheet Menu Bar").Controls(msoControlButton).Delete
End Sub


HILFE!
und schönes wochenende