Mettre 2 personnes en copie outlook

Bonjour à tous,

Je souhaite mettre 2 personnes en copie d'un mail. Les adresses mails de ces personnes en copie sont renseignées dans une colonne de mon fichier excel (colonne 8 et colonne 9). ces deux personnes ne sont pas toujours les même.

J'arrive uniquement à mettre l'un ou l'autre mais pas les deux en même temps... Les syntaxes ci-dessous ne fonctionnent pas

mail.CC = .Cells(i, 8) & ";" & mail.CC = .Cells(i, 9)

mail.CC = .Cells(i, 8) & mail.CC = .Cells(i, 9)

Pourriez-vous svp m'indiquer comment mettre 2 personnes en copie d'un mail envoyé par macro ci-dessous :

Sub envoie()
      rep = "chemin"

    With Sheets("Mails")
        dl = .Cells(Rows.Count, 2).End(xlUp).Row 
        Set ol = CreateObject("outlook.application") 
        For i = 7 To dl 
            Set mail = ol.createitem(0)
                        mail.To = .Cells(i, 5) 
                        mail.CC = .Cells(i, 8) & ";" & mail.CC = .Cells(i, 9)

            mail.Subject = .Cells(3, 3) ' Objet du mail
           mail.Body = ""

            mail.attachments.Add (rep & "\" & .Cells(i, 6).Value) & "fichier" & ".xlsx" 
            mail.Display 
            mail.send
        Next i
    End With
End Sub
 

Bonjour,

Vous y étiez presque je pense ! :) Vous avez juste répété deux fois la même propriété, à mon avis elles s'écrasaient mutuellement (je n'ai pas testé c'est une proposition).

Sub envoie()
      rep = "chemin"

    With Sheets("Mails")
        dl = .Cells(Rows.Count, 2).End(xlUp).Row 
        Set ol = CreateObject("outlook.application") 
        For i = 7 To dl 
            Set mail = ol.createitem(0)
                        mail.To = .Cells(i, 5) 
                        mail.CC = .Cells(i, 8) & ";" &  .Cells(i, 9)

            mail.Subject = .Cells(3, 3) ' Objet du mail
           mail.Body = ""

            mail.attachments.Add (rep & "\" & .Cells(i, 6).Value) & "fichier" & ".xlsx" 
            mail.Display 
            mail.send
        Next i
    End With
End Sub

Cdlt,

Merci beaucoup à vous Ergotamine. Cela fonctionne parfaitement !

Rechercher des sujets similaires à "mettre personnes copie outlook"