Événement BeforeDropOrPaste
Se produit lorsque vous êtes sur le point de déposer ou de coller des données sur un objet.
Syntaxe
Pour frame
Private Subobject _BeforeDropOrPaste( ByValCancelAs MSForms.ReturnBoolean,
ctrlEn tant que contrôle,
ByValActionAs fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYAs Single,
ByValEffectAs MSForms.ReturnEffect,
ByValShiftAs fmShiftState)
Pour MultiPage
Private Subobject _BeforeDropOrPaste(indexAs Long,
ByValCancelAs MSForms.ReturnBoolean,
ctrlEn tant que contrôle,
ByValActionAs fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYAs Single,
ByValEffectAs MSForms.ReturnEffect,
ByValShiftAs fmShiftState)
Pour TabStrip
Private Subobject _BeforeDropOrPaste(indexAs Long,
ByValCancelAs MSForms.ReturnBoolean,
ByValActionAs fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYAs Single,
ByValEffectAs MSForms.ReturnEffect,
ByValShiftAs fmShiftState)
Pour les autres contrôles
Private Subobject _BeforeDropOrPaste( ByValCancelAs MSForms.ReturnBoolean,
ByValActionAs fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYAs Single,
ByValEffectAs MSForms.ReturnEffect,
ByValShiftAs fmShiftState)
La syntaxe de l’événement BeforeDropOrPaste comprend les éléments suivants :
| Élément | Description |
|---|---|
| object | Obligatoire. Un objet valide. |
| index | Obligatoire. Index de la page dans une multipage que l’opération de suppression ou de collage affectera. |
| Cancel | Obligatoire. État de l’événement. False indique que le contrôle doit gérer l’événement (valeur par défaut). True indique que l’application gère l’événement. |
| Ctrl | Obligatoire. Le contrôle cible. |
| Action | Obligatoire. Indique le résultat, basé sur les paramètres de clavier actuels, de l’opération glisser-déplacer en attente. |
| Données | Obligatoire. Données déplacées pendant une opération glisser-déplacer. Les données sont empaquetées dans un DataObject. |
| X, Y | Obligatoire. Position horizontale et verticale du pointeur de la souris lors du dépôt. Ces coordonnées sont mesurées en points. X est mesuré à partir du bord gauche du contrôle ; Y est mesuré à partir du haut du contrôle. |
| Effect | Obligatoire. Effet de l’opération glisser-déplacer sur le contrôle cible. |
| Shift | Obligatoire. Spécifie l’état de Maj, Ctrl et Alt. |
Settings
Les paramètres d’Action sont les suivants :
| Constante | Valeur | Description |
|---|---|---|
| fmActionPaste | 2 | Colle l’objet sélectionné dans la cible de dépôt. |
| fmActionDragDrop | 3 | Indique que l’utilisateur a déplacé l’objet de sa source vers la cible de dépôt et l’a déposé sur la cible de dépôt. |
Les paramètres d’Effect sont les suivants :
| Constante | Valeur | Description |
|---|---|---|
| fmDropEffectNone | 0 | L'élément à déplacer n'est ni copié, ni déplacé vers la cible de dépôt. |
| fmDropEffectCopy | 1 | Copie l'élément à déplacer vers la cible de dépôt. |
| fmDropEffectMove | 2 | Déplace l'élément vers la cible de dépôt. |
| fmDropEffectCopyOrMove | 3 | Copie ou déplace la source de dépôt sur la cible de dépôt. |
Les paramètres deShift sont les suivants :
| Constante | Valeur | Description |
|---|---|---|
| fmShiftMask | 1 | La touche Maj a été enfoncée. |
| fmCtrlMask | 2 | La touche Ctrl a été enfoncée. |
| fmAltMask | 4 | La touche Alt a été enfoncée. |
Remarques
Pour un contrôle MultiPage ou TabStrip, Visual Basic pour Applications lance cet événement lorsqu’il transfère un objet de données vers le contrôle.
Pour d’autres contrôles, le système initie cet événement immédiatement avant l’opération déposer ou coller.
Lorsqu’un contrôle gère cet événement, vous pouvez mettre à jour l’argument Action pour identifier l’action glisser-déposer à exécuter.
Lorsque Effect est défini sur fmDropEffectCopyOrMove, vous pouvez définir Action sur fmDropEffectNone, fmDropEffectCopy ou fmDropEffectMove.
Lorsque Effect est défini sur fmDropEffectCopy ou fmDropEffectMove, vous pouvez réaffecter Action sur fmDropEffectNone. Vous ne pouvez pas réaffecter Action lorsque Effect est défini sur fmDropEffectNone.
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.