Office: WICHTIG: Gruppenname im Menüband über VBA ändern

Daniel159 · 24. März 2013

Hallo zusammen,

bin gerade dabei den Namen einer Gruppe im Menüband über VBA zu ändern.

Der Buttton befindet sich unter:

tab id="customTab" label="Makros"
group id="customGroup2" label="Makro 1"

Wie muss das label ("Makro 1") in VBA angesprochen werden?

Vielen Dank für Eure Hilfe*Smilie

Gruß,
Daniel

:)

mumpel · 26. März 2013

Hallo!

Man kann das nicht direkt per VBA ändern. Man kann aber das Attribut "getLabel" nutzen, in Verbindung mit dem onLoad-Ereignis. Über die Forensuche und Google findest Du Beispiele dazu.

Gruß, René

Daniel159 · 16. April 2013

Vielen Dank für Ihren Lösungsvorschlag. (Réne)

Es sollte jedoch (was ich vergessen habe zu erwähnen) laufend in der geöffneten Datei der Gruppenname geändert werden können.

Wäre sehr dankbar für eine Lösung!

Gruß, Daniel

mumpel · 16. April 2013

Wie bereits erwähnt, funktioniert das mit getLabel.

RibbonX-Code:

<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui" onLoad="onLoad_test37">
<ribbon startFromScratch="false">
<tabs>
<tab id="tab00" label="Test37">
<group id="grp0" getLabel="getLabel_Group0">
<button id="btn0" label="Test37" imageMso="HappyFace" size="large" onAction="onAction_btn0" />
</group>
</tab>
</tabs>
</ribbon>
</customUI>Lukas MosimannProjektbetreuung durch mumpelCode erstellt und getestet in Office 15
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

VBA-Code:

Public objRibbon As IRibbonUI

Public Sub onLoad_test37(ribbon As IRibbonUI)
Set objRibbon = ribbon
End Sub

Public Sub getLabel_Group0(control As IRibbonControl, ByRef label)
label = Range("A1").Value
End Sub

Public Sub onAction_btn0(control As IRibbonControl)
objRibbon.Invalidate
End SubLukas MosimannProjektbetreuung durch mumpelCode erstellt und getestet in Office 15
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Wenn sich etwas "laufend" ändern soll, dann musst Du dafür sorgen dass das Ribbon auch aktualisiert wird. Stichwort "objRibbon.Invalidate". Das kann man auch in "Worksheet_Change" einbauen.

Office: WICHTIG: Gruppenname im Menüband über VBA ändern

WICHTIG: Gruppenname im Menüband über VBA ändern

WICHTIG: Gruppenname im Menüband über VBA ändern

WICHTIG: Gruppenname im Menüband über VBA ändern

WICHTIG: Gruppenname im Menüband über VBA ändern - Similar Threads - Gruppenname Menüband VBA

Einzelne Formulare in ein Menüband von Outlook einbinden

Menüpunkt Textbausteine

Office App fürs Tablett - Schriftart etc nicht einstellbar.

Office 2019 - Menüband speichern wie?

Nach Automation Menü und Toolbar verschwunden

Schriftart/ Hintergrundfarbe Menüband

E-Mail-Vorlage im Menüband/Registerkarte