Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Cette méthode affiche une barre de commandes sous la forme d'un menu contextuel selon les coordonnées indiquées ou selon celles du curseur actif.
Remarque
L’utilisation des barres de commandes dans certaines applications Microsoft Office a été remplacée par le nouveau composant ruban de l’interface utilisateur Microsoft Office Fluent. Pour plus d’informations, voir Vue d’ensemble du ruban Office Fluent.
Syntaxe
expression. ShowPopup(x, y)
expression Variable qui représente un objet CommandBar .
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| x | Facultatif | Variant | Coordonnée x sur laquelle l’emplacement du menu contextuel est basé. Si cet argument est omis, la coordonnée x actuelle du pointeur est utilisée. |
| y | Facultatif | Variant | Coordonnée y sur laquelle l’emplacement du menu contextuel est basé. Si cet argument est omis, la coordonnée y actuelle du pointeur est utilisée. |
Remarques
Lorsque les menus sont alignés à gauche, le menu contextuel affiché par la méthode ShowPopup a son coin supérieur gauche à (x, y + 1) ; lorsque les menus sont alignés à droite, le menu contextuel a son coin supérieur droit à (x + 1, y + 1). Utilisez la fonction Windows GetSystemMetrics(SM_MENUDROPALIGNMENT) pour case activée la métrique système pour l’alignement du menu déroulant.
Lorsque l’emplacement à l’écran des coordonnées (x, y) entraîne l’affichage de la totalité ou d’une partie du menu contextuel au-delà du bord de l’écran visible, le menu contextuel se déplace pour s’adapter à la zone visible.
Exemple
Cet exemple montre comment créer un menu contextuel contenant deux contrôles. La méthode ShowPopup affiche ce menu.
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
Remarque
Si la valeur msoBarPopup n'est pas affectée à la propriété Position de la barre de commandes, cette méthode échoue.
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.