miguelangelo
XLDnaute Occasionnel
Bonjour à tous,
j'ai fais ma recherche (excel downloads+google) et je trouve pas mon bonheur.
en fait j'utilise les qq lignes ci dessous pour l'envoi d'email via vba
Set OutApp = CreateObject("Outlook.Application")
OutApp.Session.Logon
Set OutMail = OutApp.CreateItem(0)
'strbody = "<A HREF=""\\Mes Documents\Photos 2007"">Photos 2007</A>"
On Error Resume Next
With OutMail
.from = "boite generique" 'ne marche pas
.to = destinataire
'.CC = "tintin@sweetheart"
.BCC = ""
.Subject = Selection.Value & "-" & Selection.Offset(0, 2).Value
.Body = "test de mail"
.BodyFormat = olFormatHTM
OutMail.send
par contre, j'ai besoin de l'envoyer d'une boite générique (dans laquelle j'ai tous les droits).
j'ai essayé ca :
.from = "boite generique" et le resultat est ...nul
merci pour votre aide
j'ai fais ma recherche (excel downloads+google) et je trouve pas mon bonheur.
en fait j'utilise les qq lignes ci dessous pour l'envoi d'email via vba
Set OutApp = CreateObject("Outlook.Application")
OutApp.Session.Logon
Set OutMail = OutApp.CreateItem(0)
'strbody = "<A HREF=""\\Mes Documents\Photos 2007"">Photos 2007</A>"
On Error Resume Next
With OutMail
.from = "boite generique" 'ne marche pas
.to = destinataire
'.CC = "tintin@sweetheart"
.BCC = ""
.Subject = Selection.Value & "-" & Selection.Offset(0, 2).Value
.Body = "test de mail"
.BodyFormat = olFormatHTM
OutMail.send
par contre, j'ai besoin de l'envoyer d'une boite générique (dans laquelle j'ai tous les droits).
j'ai essayé ca :
.from = "boite generique" et le resultat est ...nul
merci pour votre aide