Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Zeigt eine Befehlsleiste als Kontextmenü an den angegebenen Koordinaten oder an den aktuellen Zeigerkoordinaten an.
Hinweis
[!HINWEIS] "CommandBar"-Objekte wurden in einigen Microsoft Office-Anwendungen durch die neue Menüband-Komponente der Microsoft Office Fluent-Benutzeroberfläche abgelöst. Weitere Informationen finden Sie unter Übersicht über das Office Fluent-Menüband.
Syntax
Ausdruck verwendet werden. ShowPopup(x, y)
Ausdruck Eine Variable, die ein CommandBar-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| x | Optional | Variant | Die x-Koordinate, auf der die Position des Kontextmenüs basiert. Wird dieses Argument weggelassen, wird die aktuelle x-Koordinate des Mauszeigers verwendet. |
| y | Optional | Variant | Die y-Koordinate, auf der die Position des Kontextmenüs basiert. Wird dieses Argument weggelassen, wird die aktuelle y-Koordinate des Mauszeigers verwendet. |
Hinweise
Wenn Menüs linksbündig ausgerichtet sind, hat das von der ShowPopup-Methode angezeigte Kontextmenü seine obere linke Ecke bei (x, y + 1); Wenn Menüs rechtsbündig ausgerichtet sind, befindet sich die obere rechte Ecke des Kontextmenüs bei (X + 1, Y + 1). Verwenden Sie die Windows-Funktion GetSystemMetrics (SM_MENUDROPALIGNMENT), um die Systemmetrik auf die Ausrichtung des Dropdownmenüs zu überprüfen.
Wenn die Bildschirmposition der (x, y)-Koordinaten dazu führen würde, dass das gesamte oder ein Teil des Popup-Menüs über den Rand des sichtbaren Bildschirms hinaus angezeigt wird, verschiebt sich das Popup-Menü, um in den sichtbaren Bereich zu passen.
Beispiel
In diesem Beispiel wird ein Kontextmenü mit zwei Steuerelementen erstellt. Das Kontextmenü wird mit der ShowPopup-Methode sichtbar gemacht.
Set myBar = CommandBars _
.Add(Name:="Custom", Position:=msoBarPopup, Temporary:=False)
With myBar
.Controls.Add Type:=msoControlButton, Id:=3
.Controls.Add Type:=msoControlComboBox
End With
myBar.ShowPopup
Hinweis
Wenn die Position-Eigenschaft der Befehlsleiste nicht auf msoBarPopup festgelegt ist, kann diese Methode nicht angewendet werden.
Siehe auch
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.