Ajout d'un destinataire en copie

Résolu
scheda Messages postés 10 Statut Membre -  
scheda Messages postés 10 Statut Membre -
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

  1. thev Messages postés 2007 Date d'inscription   Statut Membre Dernière intervention   722
     
    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
    1. scheda Messages postés 10 Statut Membre
       
      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
    2. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   1 588
       
      Qu'est-ce qui ne fonctionne pas? Quel est le contenu de B7?
      0
    3. scheda Messages postés 10 Statut Membre
       
      dsl pour la réponse tardive oui sa fonctionne encore merci pour le coup de main
      0