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 ersetzte die Microsoft Office Fluent-Benutzeroberfläche das vorherige System mit gestapelten Menüs, Symbolleisten und Aufgabenbereichen. VBA-Objekte und -Elemente, die Sie zum Anpassen der Benutzeroberfläche in früheren Versionen von Visio verwendet haben, sind in Visio weiterhin verfügbar, funktionieren jedoch anders.

Syntax

Ausdruck verwendet werden. Befehlsleisten

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 werden seit Visio Version 4.0 Anwendungs- und Dokumenteigenschaften verfügbar gemacht, die ein UIObject-Objekt zurückgeben, das ähnliche Funktionen wie CommandBars bietet. 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:

1. Wählen Sie auf der Registerkarte "Entwicklertools " die Option "Visual Basic" aus.

2. Wählen Sie im Menü Ansichtdie Option Objektbrowser aus.

3. Wählen Sie in der Liste Projekt/Bibliothekdie Option Office aus.

4. 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.

5. 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"), auf den 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.

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.