[RESOLU] 2 destinataire dans la fonction //monmail.To = "test@mail.com"//

[laskoo87]

Hello !

Deuxième galère de la journée, savez vous comment mettre deux destinataire dans la fonction suivante???

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim ol As Object, monmail As Object
DisplayAlerts = False
Set ol = CreateObject("outlook.application")
Set monmail = ol.CreateItem(olMailItem)
monmail.To = "test@mail.com"
monmail.Subject = "Modifs fiche produit " & ThisWorkbook.Name
monmail.Body = "Notification automatique: Modifications enregistrées sur la fiche produit " & [A1].Value
monmail.Send
Set ol = Nothing
End Sub

Merci !

 

[laskoo87]

Re : 2 destinataire dans la fonction //monmail.To = "test@mail.com"//

Après quelques essauis infructeurx, voici la réponse:
monmail.To = "test@mail.com" & ";" & "test2@mail.com"

A++