Discussion :

[VNS94]

Bonjour,

J'aimerais envoyer un mail à 3 personne dont 2 en CC via VBA sous Word.

Je n'arrive pas à ajouter la 2ème personne en CC.
Je vous mets mon code juste en dessous :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
    With xEmail
     .Display
        .Importance = 2
        .To = "xxxxxxx@UUUUU.fr"
        .CC = "ZZZZZZZZ@UUUUU.fr" & "YYYYYYYYY@UUUUU.fr"
        .Subject = "Demande d'établissement de contrat pour " & ThisDocument.TextBox3.Text & " " & ThisDocument.TextBox4
        .HTMLBody = "Bonjour," & "<br>" & "Merci de bien vouloir déclarer " & ThisDocument.TextBox3.Text & " " & ThisDocument.TextBox4 & " du " & ThisDocument.TextBox1.Text & " au " & ThisDocument.TextBox2.Text & "." & "<br>" & "Bonne fin de journée." & "<br>" & .HTMLBody
        .Attachments.Add xDoc.FullName

Bien sur le "&" ne fonctionne pas, vu que Outlook s'ouvre mais j'obtiens les deux adresses fusionnées en CC : "ZZZZZZZZ@UUUUU.frYYYYYYYYY@UUUUU.fr"

Merciii pour votre aide !

[hyperion13]

Salut

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.CC = "ZZZZZZZZ@UUUUU.fr" &";"& "YYYYYYYYY@UUUUU.fr"

[VNS94]

Merciiiiiiiii !