Envoi de mail dans une macro VBA

Signaler
Messages postés
1
Date d'inscription
vendredi 28 janvier 2005
Statut
Membre
Dernière intervention
28 janvier 2005
-
Messages postés
868
Date d'inscription
dimanche 26 décembre 2004
Statut
Membre
Dernière intervention
26 février 2008
-
salut,
devant la profusion de solutions je suis perdu ...

En VBA (pas VB donc), quelle est le meilleur code d'écriture d'une macro permettant l'envoi d'un mail ??

Merci !

2 réponses

Messages postés
868
Date d'inscription
dimanche 26 décembre 2004
Statut
Membre
Dernière intervention
26 février 2008
1
Si t'es sur XP, essaie le code suivant dans une macro (chez moi ça marche) :
Set obmail = CreateObject("CDO.Message")
obmail.From = "émetteur@free.fr"
obmail.To = "destinataire@wanadoo.fr"
obmail.Subject = "Un message"
obmail.Textbody = "Le joli petit message !"
obmail.AddAttachment "C:\texte.doc"
obmail.Send
Normalement, ça doit marcher sur XP.
Réponds moi pour me dire si ça marche...
Messages postés
868
Date d'inscription
dimanche 26 décembre 2004
Statut
Membre
Dernière intervention
26 février 2008
1
J'ai oublier de te dire : l'émetteur peut avoir un nom bidon tant que le domaine écrit existe (ici, c'est free mais tu aurais pu mettre wanadoo ou hotmail ou caramail...). De plus, tu peux mettre un corps en HTML. C'est obmail.HTMLbody (je crois...)
Allez !!! Tchao !!!