Application.CommandBars-Eigenschaft (Visio)
Gibt einen Verweis auf die CommandBars-Auflistung zurück, die die Befehlsleisten in der Containeranwendung darstellt. Schreibgeschützt.
Hinweis
Ab Visio 2010 ersetzt die Microsoft Office Fluent-Benutzeroberfläche das vorherige System von mehrstufigen Menüs, Symbolleisten und Aufgabenbereichen. VBA-Objekte und -Member, die Sie in früheren Versionen von Visio zum Anpassen der Benutzeroberfläche verwendet haben, sind weiterhin in Visio verfügbar, funktionieren aber anders.
Syntax
Ausdruck. CommandBars
expression Eine Variable, die ein Application-Objekt darstellt.
Rückgabewert
CommandBars
Hinweise
Ab Microsoft Visio 2002 können Menüs und Symbolleisten auf der Visio-Benutzeroberfläche mit einem Programm bearbeitet werden, indem die von der CommandBars-Eigenschaft zurückgegebene CommandBars-Auflistung bearbeitet wird. Die CommandBars-Auflistung weist die gleiche Oberfläche wie die CommandBars-Auflistung auf, die von den Microsoft Office-Anwendungen wie Microsoft Word und Microsoft Excel verfügbar gemacht wird.
Alternativ dazu hat Visio seit Visio Version 4.0 Anwendungs- und Dokumenteigenschaften verfügbar gemacht, die ein UIObject-Objekt zurückgeben, das ähnliche Funktionen wie CommandBars bereitstellt. Demzufolge können die Visio-Menüs und -Symbolleisten von Programmen entweder mit der CommandBars-Auflistung oder mit UIObject-Objekten bearbeitet werden.
So rufen Sie Informationen zu dem Objekt ab, das von der CommandBars-Eigenschaft zurückgegeben wird:
Wählen Sie auf der Registerkarte Entwicklertoolsdie Option Visual Basic aus.
Wählen Sie im Menü Ansicht die Option Objektbrowser aus.
Wählen Sie in der Liste Projekt/Bibliothekdie Option Office aus.
Wenn die Office-Typbibliothek in der Liste Projekt/Bibliothek nicht angezeigt wird, wählen Sie im Menü Extras die Option Verweise aus, aktivieren Sie das Kontrollkästchen Microsoft Office 14.0-Objektbibliothek , und klicken Sie dann auf OK.
Untersuchen Sie unter Klassen die Klasse mit dem Namen CommandBars.
Jedes CommandBarControl-Objekt in einer CommandBars-Auflistung besitzt eine OnAction-Eigenschaft, und jedes CommandBar-Objekt in einer CommandBars-Auflistung besitzt eine Context-Eigenschaft. Die Werte dieser Eigenschaften werden durch die Containeranwendung bestimmt. Für Microsoft Visio gilt Folgendes:
Die OnAction-Eigenschaft ist ein String-Wert, der entweder als COM-Add-In, als VBA-Makro (Microsoft Visual Basic für Applikationen), als VBA-Code oder als Name eines Visio-Add-Ons interpretiert wird.
Durch die Context-Eigenschaft wird bestimmt, in welchem Menükontext eine Befehlsleiste angezeigt wird.
- Die Menükontextnummer ist ein String-Wert (z. B. visUIObjSetDrawing oder "2"), dem ein Sternchen folgt, wenn die Befehlsleiste standardmäßig sichtbar ist (z. B. visUIObjSetShapeSheet
& "*" or "4*"). - Gültige Menükontexte sind visUIObjSetDrawing (2), visUIObjSetStencil (3), visUIObjSetShapeSheet (4), visUIObjSetIcon (5) oder visUIObjSetPrintPreview (7). Der Versuch, einen anderen Wert für die Context-Eigenschaft festzulegen, führt zu einem Fehler.
- Die Menükontextnummer ist ein String-Wert (z. B. visUIObjSetDrawing oder "2"), dem ein Sternchen folgt, wenn die Befehlsleiste standardmäßig sichtbar ist (z. B. visUIObjSetShapeSheet
Beispiel
Dieses Makro zeigt, wie Sie mit der CommandBars-Eigenschaft die Befehlsleisten auflisten können.
Public Sub CommandBars_Example()
Dim vsoCommandBars As CommandBars
Dim vsoCommandBar As CommandBar
'Get the set of CommandBars
'for the application.
Set vsoCommandBars = Application.CommandBars
'List each CommandBar in the Immediate window.
For Each vsoCommandBar In vsoCommandBars
Debug.Print vsoCommandBar.Name
Next
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.