Événements MouseDown, MouseUp
Interviennent lorsque l’utilisateur clique sur un bouton de la souris. MouseDown se produit lorsque l’utilisateur appuie sur le bouton de la souris ; MouseUp se produit lorsque l’utilisateur relâche le bouton de la souris.
Syntaxe
Pour MultiPage, TabStrip
Private Subobject _MouseDown(indexAs Long,
ByValButtonAs fmButton,
ByValShiftAs fmShiftState,
ByValXAs Single,
ByValYAs Single)Private Subobject _MouseUp(indexAs Long,
ByValButtonAs fmButton,
ByValShiftAs fmShiftState,
ByValXAs Single,
ByValYAs Single)
Pour les autres contrôles
Private Subobject _MouseDown( ByValButtonAs fmButton,
ByValShiftAs fmShiftState,
ByValXAs Single,
ByValYAs Single)Private Subobject _MouseUp( ByValButtonAs fmButton,
ByValShiftAs fmShiftState,
ByValXAs Single,
ByValYAs Single)
La syntaxe des événements MouseDown et MouseUp comprend les éléments suivants :
| Élément | Description |
|---|---|
| object | Obligatoire. Un objet valide. |
| index | Obligatoire. Index de la page ou de l’onglet dans un objet MultiPage ou TabStrip avec l’événement spécifié. |
| Bouton | Obligatoire. Valeur entière identifiant le bouton de la souris ayant provoqué l’événement. |
| Shift | Obligatoire. État de Alt, Maj et Ctrl. |
| X, Y | Obligatoire. Position horizontale ou verticale, en points, à partir du bord gauche ou supérieur du formulaire, Frame ou Page. |
Paramètres
Les valeurs de Button sont les suivantes :
| Constante | Valeur | Description |
|---|---|---|
| fmButtonLeft | 1 | Le bouton gauche a été appuyé. |
| fmButtonRight | 2 | Le bouton droit a été appuyé. |
| fmButtonMiddle | 4 | Le bouton central a été appuyé. |
Les valeurs de Shift sont les suivantes :
| Valeur | Description |
|---|---|
| 1 | La touche Maj a été enfoncée. |
| 2 | La touche Ctrl a été enfoncée. |
| 3 | Maj et Ctrl ont été appuyés. |
| 4 | La touche Alt a été enfoncée. |
| 5 | Alt et Maj ont été appuyés. |
| 6 | Alt et Ctrl ont été appuyés. |
| 7 | Alt, Maj et Ctrl ont été appuyés. |
Vous pouvez identifier des états distincts du clavier au moyen des constantes suivantes :
| Constante | Valeur | Description |
|---|---|---|
| fmShiftMask | 1 | Masque pour détecter Maj. |
| fmCtrlMask | 2 | Masque pour détecter Ctrl. |
| fmAltMask | 4 | Masque pour détecter Alt. |
Remarques
Pour une multipage, l’événement MouseDown se produit lorsque l’utilisateur appuie sur un bouton de la souris sur le contrôle.
Pour un contrôle TabStrip, l’argument index identifie l’onglet sur lequel l’utilisateur a cliqué. Un index de -1 indique que l’utilisateur n’a pas cliqué sur un onglet. Par exemple, s’il n’y a pas d’onglets dans le coin supérieur droit du contrôle, le fait de cliquer dans le coin supérieur droit affecte à l’index la valeur -1.
Pour une feuille, l’utilisateur peut générer des événements MouseDown et MouseUp lorsqu’il pointe dans une zone vierge, un sélecteur d’enregistrement ou une barre de défilement de la feuille et appuie sur un bouton de la souris et le relâche.
La séquence des événements relatifs à la souris est la suivante :
- MouseDown
- MouseUp
- Clic
- Doubleclic
- MouseUp
Les procédures des événements MouseDown ou MouseUp spécifient les actions à exécuter lorsqu’un bouton de la souris est appuyé ou relâché. Les événements MouseDown et MouseUp vous permettent de faire la distinction entre les boutons gauche, droit et central de la souris. Vous pouvez aussi écrire du code pour des combinaisons souris-clavier utilisant les modificateurs du clavier Alt, Maj et Ctrl.
Si on appuie sur un bouton de la souris pendant que le pointeur est au-dessus d’une feuille ou d’un contrôle, cet objet « capture » la souris et reçoit tous les événements souris jusqu’au dernier événement MouseUp. Ceci implique que les coordonnées du pointeur souris X, Y retournées par un événement souris ne se trouvent pas toujours dans les limites de l’objet qui les reçoit.
Si on appuie successivement sur des boutons de la souris, l’objet qui capture la souris reçoit tous les événements souris successifs jusqu’au relâchement de tous les boutons.
Utilisez l’argument Shift pour identifier l’état de Maj, Ctrl et Alt lorsqu’un événement MouseDown ou MouseUp s’est déclenché. Par exemple, si Ctrl et Alt ont été tous les deux appuyés, la valeur de Shift est 6.
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.