VBa - Envoi d'un email via l'email souhaité

[Hieu]

Bonjour,

Après quelques recherches, j'ai trouvé comment envoyer un email.
Sauf qu'il n'y a pas de parametres ".from" ?

J'ai plusieurs emails dans mon outlook, et je ne peux pas choisir l’expéditeur ?

Merci,

ref : http://www.info-3000.com/vbvba/envoiemailoutlook.php

 

[Lone-wolf]

Bonjour Hieu 🙂, le Forum 🙂

À moins de créer déjà plusieurs comptes Outlook sur ton pc, sinon c'est impossible. Et pour creer plusieurs comptes, il faut que tu fasse la demande à ton fournisseur pour qu'ils t'envoie les mots de passes pour chaque compte. Ensuite, comment faire la configuration, la réponse est ICI sinon le faire directement avec ton fournisseur d'accès.

Edit: Bonjour Roland 🙂

 

[Roland_M]

Bonjour tout le monde,

avec outlook le paramètre ".from" n'existe pas !
il n'y a qu'un seul expéditeur, celui du compte !

 

[Hieu]

ok, merci !

 

[fp22us]

Bonjour Hieu, le forum,

Il faut faire du vba avec Outlook, et non avec excel pour gérer l'envoi de cet email: le paramètre SentOnBehalfOfName va pouvoir gérer l'adresse mail d'envoi.

A +


Dim ObjOutlook As New Outlook.Application
Dim oBjMail

Set ObjOutlook = New Outlook.Application
Set oBjMail = ObjOutlook.CreateItem(olMailItem)

With oBjMail
.SentOnBehalfOfName = "Ici votre adresse email d'envoi"
.To = CustomerEmail ' le destinataire
.Subject = "L'objet du mail "
.BodyFormat = olFormatHTML
.HTMLBody = Mailbody 'le corps du mail
.Attachments.Add NomFichier ' Nomfichier
.Display ' Pour afficher avant d'envoyer
'.Send ' Pour envoyer sans afficher
End With

 

[Hieu]

Salut @fp22us ,

Mon but étant de m'améliorer en excel.
Merci tout de même pour cette solution ::
++