Envoi mail depuis Excel avec Option Réponse directe à

Bonjour le forum,

J'envoi actuellement des mails, via un VBA Excel.

Comment faire pour y intégrer l'option "REPONSES DIRECTES A" d'Outlook ?

Si dessous extrait du code actuel

Set myol = New Outlook.Application
        Set myitem = myol.CreateItem(olMailItem)
        myitem.To = rListe.Offset(iIndice, 4).Value
        tCopy = rListe.Offset(iIndice, 5).Value
        myitem.CC = rListe.Offset(iIndice, 5).Value
        myitem.Subject = nomenvoiagence
        myitem.Body = rListe.Offset(0, 9).Value

Merci d'avance de votre aide

Bruno

bonjour,

as-tu essayé .replyto ?