Envoi mail a 2 destinataires différents

Bonsoir,

Je sollicite votre aide SVP.

Je souhaite envoyé depuis mon fichier excel un mail a deux destinataires différents en joignant le dit fichier.

Voici mon code qui fonctionne pour un destinataire mais lorsque j'ajoute email2 dans les arguments ça ne fonctionne plus.

Pourtant j'ai vu que la fonction Application.Dialogs(xlDialogSendMail).Show peut prendre jusqu'à 30 argument.

Dim Email, Email2, Societe, TypeService, TypeResa, NomPax, PrenomPax, NomAssist, PrenomAssist, Destination, NoMission As String

Sub MailStandard()

If IsValid Then

InitVariables

Application.Dialogs(xlDialogSendMail).Show arg1:=Email, arg2:=Societe & " >> " & TypeService & TypeResa & " >> " & NomAssist & "/" & PrenomAssist & " - " & Date & " - " & Destination & " - N° Mission: " & NoMission & " - " & NomPax & "/" & PrenomPax

ActiveWindow.ScrollRow = 1

End If

End Sub

Merci pour votre aide SVP,

Merci beaucoup

Bonjour,

à tester,

Email = "client1@go.net;client2@go.net"

Bonjour sabV,

oh merci infiniment, j'ai testé et ça fonctionne.

je me sens bête , merci beaucoup.

Alexia

Rechercher des sujets similaires à "envoi mail destinataires differents"