Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Format-Menü löschen und ShortCut umbenennen

Gruppe

Control

Problem

In der Arbeitsblatt-Menüleiste soll das Format-Menü gelöscht und der ShortCut für das Daten-Menü auf t gesetzt werden.

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: Modul1

Sub EditCmdBar()
   On Error GoTo ERRORHANDLER
   With Application.CommandBars("Worksheet Menu Bar")
      .Controls("Daten").Caption = "Da&ten"
      .Controls("Format").Delete
   End With
   Exit Sub
ERRORHANDLER:
   MsgBox "Ein Element wurde nicht gefunden!"
End Sub

Sub Zurueck()
   Application.CommandBars("Worksheet Menu Bar").Reset
End Sub

    

Beiträge aus dem Excel-Forum zu den Themen Menue und Control