É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
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.