Partager via


Événement Explorer.BeforeItemCopy (Outlook)

Survient lorsqu'un élément Outlook est copié.

Syntaxe

expression. BeforeItemCopy( _Cancel_ )

Expression Variable qui représente un objet Explorer .

Parameters

Nom Requis/Facultatif Type de données Description
Cancel Obligatoire Booléen False lorsque l'événement se produit. Si la procédure événementielle affecte à cet argument la valeur True, l'opération ne se termine pas et l'élément n'est pas copié.

Remarques

Cet événement peut être annulé après son déclenchement.

Exemple

L’exemple Microsoft Visual Basic pour Applications (VBA) suivant montre comment inviter l’utilisateur à confirmer la copie d’un élément. Un message s’affiche pour que l’utilisateur confirme que l’élément doit bien être copié. Si l’utilisateur clique sur Oui, l’élément est copié dans le Presse-papiers. 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 Microsoft Outlook.

Public WithEvents myOlExp As Outlook.Explorer 
 
 
 
Sub Initialize_Handler() 
 
Set myOlExp = Application.ActiveExplorer 
 
End Sub 
 
 
 
Private Sub myOlExp_BeforeItemCopy(Cancel As Boolean) 
 
'Prompts the user before copying an item 
 
 
 
 Dim lngAns As Long 'user answer 
 
 'Display question to user 
 
 lngAns = MsgBox("Are you sure you want to copy the item?", vbYesNo) 
 
 If lngAns = vbYes Then 
 
 Cancel = False 
 
 Else 
 
 'Set Cancel argument based on answer 
 
 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.