Ajout d'un destinataire en copie

Résolu
scheda Messages postés 10 Date d'inscription   Statut Membre Dernière intervention   -  
scheda Messages postés 10 Date d'inscription   Statut Membre Dernière intervention   -
Bonjours,

A partir d'un fichier Excel j'envois une plage de cellules dans un corps de message Outlook pour le moment ca fonctionne bien.
Cependant, je voudrait ajouter un destinataire en copie et là je coince j'ai fouillé dans les fils de discutions dans différents forums et je ne trouve pas de solutions, pourriez vous m'aider SVP
voici le code que j'utilise.
Je précise que je suis un parfait débutant en VBA

Sub envoiPlageCellules_Excel()
ActiveSheet.Range("A1:I22").Select ' la plage de cellules à envoyer
ActiveWorkbook.EnvelopeVisible = True

With ActiveSheet.MailEnvelope
.Introduction = "bonjour , ci joint la commande pour validation ..."
.Item.to = [B6]

.Item.Subject = "le sujet"
.Item.Send
End With
End Sub

1 réponse

thev Messages postés 1981 Date d'inscription   Statut Membre Dernière intervention   711
 
Bonjour,

 
With ActiveSheet.MailEnvelope
.Introduction = "bonjour , ci joint la commande pour validation ..."
.Item.to = [B6]
.Item.cc = [B7]
.Item.Subject = "le sujet"
.Item.Send
End With


2
scheda Messages postés 10 Date d'inscription   Statut Membre Dernière intervention  
 
Merci pour la réponse et dsl pour le retard de ma part,
pour la ligne cc ca ne fonctionne pas déjà essayer une autre idée ?
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 583
 
Qu'est-ce qui ne fonctionne pas? Quel est le contenu de B7?
0
scheda Messages postés 10 Date d'inscription   Statut Membre Dernière intervention  
 
dsl pour la réponse tardive oui sa fonctionne encore merci pour le coup de main
0