Événement Explorer.BeforeItemPaste (Outlook)
Survient lorsqu'un élément Outlook est collé.
Syntaxe
expression. BeforeItemPaste( _ClipboardContent_ , _Target_ , _Cancel_ )
Expression Variable qui représente un objet Explorer .
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Contenu du Presse-papiers | Requis | Variant | Contenu à coller. |
| Target (Cible) | Requis | Folder | Destination du contenu à coller. |
| Cancel | Obligatoire | Booléen | False lorsque l'événement se produit. Si la procédure événementielle affecte la valeur True à cet argument, l'opération n'est pas achevée et l'élément n'est pas supprimé. |
Remarques
Cet événement peut être annulé après son déclenchement.
Exemple
L’exemple Microsoft Visual Basic pour Applications (VBA) suivant invite l’utilisateur avant de coller le contenu du Presse-papiers à la cible spécifiée. Si l’utilisateur clique sur Oui, le contenu actuel du Presse-papiers est copié vers la destination cible spécifiée. L’exemple de code doit être placé dans un module de classe tel que ThisOutlookSession, et la Initialize_handler routine doit être appelée avant que la procédure événementielle puisse être appelée par Outlook.
Public WithEvents myOlExp As Outlook.Explorer
Sub Initialize_Handler()
Set myOlExp = Application.ActiveExplorer
End Sub
Private Sub myOlExp_BeforeItemPaste(ClipboardContent As Variant, ByVal Target As Folder, Cancel As Boolean)
Dim lngAns As Integer 'users' answer
'Prompt user about paste
lngAns = MsgBox("Are you sure you want to paste the contents of the clipboard into the " _
& Target.Name & "?", vbYesNo)
If lngAns = vbNo Then
Cancel = True
End If
End Sub
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.