Trouvé, il suffit de mettre:
With NewMail
.Subject = "SUJET DU MAIL"
.From = "TOTO <noreply@gmail.com>"
Trouvé, il suffit de mettre:
With NewMail
.Subject = "SUJET DU MAIL"
.From = "TOTO <noreply@gmail.com>"
Bonjour,
Mon code pour envoyer des mails es le suivant,
....
Dim msg, Style, titre
Dim NewMail As Object
Dim mailConfig As Object
Dim fields As Variant
Dim...
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.