É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

Explorer, objet

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.