Macro - Envoyer en copie cachée

Bonjour à tous !

Voici mon petit morceau de macro pour envoyer simplement ma feuille de travail par mail :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub Envoimonteur() 'Envoyer Set olApp = CreateObject("Outlook.application") Set m = olApp.CreateItem(olMailItem) With m .Subject = Range("a2") & "-" & Range("b4") & "-" & Range("c4") .Body = "Merci de prendre en compte la demande préparation en pièce jointe." .Recipients.Add "b@a.com; j@a.com; m@a.com" .Attachments.Add "X:\DOCUMENTS COMMUNS\" .Display End With End Sub

---

Mon souhait est de savoir s'il est possible d'ajouter une ligne pour envoyer le mail à des destinataires en copie cachée ? Il y aurait il une commande .recipients.add.cc ?

Merci d'avance pour votre aide !

Bonjour,

Code:

---

.BCC

---

Pour connaître les propriétés d'un objet, dans VBE, affiche la fenêtre des variables locales.
En mode pas-à-pas, tu pourras cliquer sur le + devant l'objet en question et voir toutes ses propriétés.

Merci pour ton aide ainsi que tes conseils. Le .CC fonctionne parfaitement !

J'aimerais ajouter une dernière chose au code mais après utilisation de la fenêtre des variables je n'ai pas trouvé comment insérer "l'accusé de réception" Il me semble que cela doit être de la forme ReturnReceipt, mais je ne sais pas comment l'ajouter au code ?

Bonjour,

Tu n'avais pas cherché bien loin...

Code:

---

.ReadReceiptRequested = True

---