Partager via


Événement MailItem.ReplyAll (Outlook)

Survient lorsque l'utilisateur sélectionne l'action ReplyAll pour un élément ou lorsque la méthode ReplyAll est appelée pour cet élément (ce dernier étant une instance de l'objet parent).

Syntaxe

expression. ReplyAll( _Response_ , _Cancel_ )

expression Variable qui représente un objet MailItem.

Paramètres

Nom Requis/Facultatif Type de données Description
Réponse Obligatoire Object Nouvel élément envoyé en réponse au message d’origine.
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 de réponse à toutes les personnes n'est pas achevée et le nouvel élément ne s'affiche pas.

Remarques

Renvoie la réponse sous la forme d’un objet MailItem .

Exemple

Cet exemple Visual Basic pour Applications (VBA) utilise l’événement ReplyAll et rappelle à l’utilisateur que la procédure répond à tous les destinataires d’origine d’un élément et, en fonction de la réponse de l’utilisateur, autorise l’action à continuer ou l’arrête. Pour utiliser cet exemple, ouvrez un élément de courrier existant, exécutez la Initialize Handler() procédure, puis répondez à l’élément.

Public WithEvents myItem As MailItem 
 
 
 
Sub Initialize_Handler() 
 
 Set myItem = Application.ActiveInspector.CurrentItem 
 
End Sub 
 
 
 
Private Sub myItem_ReplyAll(ByVal Response As Object, Cancel As Boolean) 
 
 Dim mymsg As String 
 
 Dim myResult As Integer 
 
 mymsg = "Do you really want to reply to all original recipients?" 
 
 myResult = MsgBox(mymsg, vbYesNo, "Flame Protector") 
 
 If myResult = vbNo Then 
 
 Cancel = True 
 
 End If 
 
End Sub

Voir aussi

Objet MailItem

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.