(Tipp 45)
Wie benennt man das Menüelement mit dem Namen "Ton" aus dem Menü Extras der Menüleiste für Tabellenblätter um in Piep?
Sub MenuelementUmbenennen() MenuBars(xlWorksheet).Menus("Extras").MenuItems("Ton").Caption = "Piep" End Sub Sub MenuelementUmbenennen1() MenuBars(xlWorksheet).Menus("Extras").MenuItems("Piep").Caption = "Ton" End Sub