Bonjour,

A partir de ma macro Excel VBA j'utilise la routine suivante pour envoyer des Email par outlook :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim oOL As Object
Dim oOLMsg As Object
Dim oOLRecip As Object
 
    Set oOL = CreateObject("Outlook.Application")
    Set oOLMsg = oOL.CreateItem(0)
    With oOLMsg
        .Recipients.Add Mailrecipient
        .Subject = Mailsubject
        .Body = Mailbody
        .Importance = 0
        .SEND
    End With
    Set oOLMsg = Nothing
    Set oOLRecip = Nothing
    Set oOL = Nothing
J'ai essayé de combiner plusieurs adresses dans "Mailrecipient", sans succès!
Comment faire pour envoyer un mail à deux ou trois destinataires.

Une suggestion autre qu'une boucle ?

A+
Guy68