OVH Cloud OVH Cloud

SendMail

3 réponses
Avatar
gerard
bonjour
j'utilise, a partir d'un Bouton
ActiveWorkbook.SendMail pour me faire envoyer automatiquement la copie d'un
dossier.
il est vrai que c'est automatique mais il ne peux rien etre mis dans le
corps du message.
y a t il une autre solution pour qu'une copie de la feuille active me soit
envoyée mais en laissant la possibilité de me mettre quelques lignes de
commentaire dans le corps du mail
enfin que le dossier ne soit pas juste en attaché

merci

3 réponses

Avatar
Leonard
Je te répond car apparement personne ne le fait. Cette question a été mainte
fois débattu sur ce forum j'ai moi-même essayer pendant de longues heures à
trouver une solution mais hélas apparement s'est IMPOSSIBLE pour le moment.
Peut être que dans les futures version...

--
Amicalement

"gerard" a écrit dans le message de
news:bu3dli$vu2$
bonjour
j'utilise, a partir d'un Bouton
ActiveWorkbook.SendMail pour me faire envoyer automatiquement la copie
d'un

dossier.
il est vrai que c'est automatique mais il ne peux rien etre mis dans le
corps du message.
y a t il une autre solution pour qu'une copie de la feuille active me soit
envoyée mais en laissant la possibilité de me mettre quelques lignes de
commentaire dans le corps du mail
enfin que le dossier ne soit pas juste en attaché

merci




Avatar
gerard
salut
et merci de ta reponse,
A+
ge
"Leonard" a écrit dans le message de
news:bu41hv$epa$
Je te répond car apparement personne ne le fait. Cette question a été
mainte

fois débattu sur ce forum j'ai moi-même essayer pendant de longues heures
à

trouver une solution mais hélas apparement s'est IMPOSSIBLE pour le
moment.

Peut être que dans les futures version...

--
Amicalement

"gerard" a écrit dans le message de
news:bu3dli$vu2$
bonjour
j'utilise, a partir d'un Bouton
ActiveWorkbook.SendMail pour me faire envoyer automatiquement la copie
d'un

dossier.
il est vrai que c'est automatique mais il ne peux rien etre mis dans le
corps du message.
y a t il une autre solution pour qu'une copie de la feuille active me
soit


envoyée mais en laissant la possibilité de me mettre quelques lignes de
commentaire dans le corps du mail
enfin que le dossier ne soit pas juste en attaché

merci








Avatar
gee-dee-
Bonsoir,
pas de solution testée à te proposer ,
mais en fouillant là, certainement que tu y trouvera ton bonheur :
http://www.rondebruin.nl/sendmail.htm
notament :

Sub Mail_workbook_Outlook()
'This example send the last saved version of the Activeworkbook
'You must add a reference to the Microsoft outlook Library
Dim OutApp As Outlook.Application
Dim OutMail As Outlook.MailItem
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(olMailItem)
With OutMail
.To = ""
.CC = ""
.BCC = ""
.Subject = "This is the Subject line"
.Body = "Hi there"
.Attachments.Add ActiveWorkbook.FullName 'In Excel 97 use
ActiveWorkbook.Path & "" & ActiveWorkbook.Name
'You can add other files also like this
'.Attachments.Add ("C:test.txt")
.Send 'or use .Display
End With
Set OutMail = Nothing
Set OutApp = Nothing
End Sub"gerard" a écrit dans le message de
news:bu3dli$vu2$
bonjour
j'utilise, a partir d'un Bouton
ActiveWorkbook.SendMail pour me faire envoyer automatiquement la copie
d'un

dossier.
il est vrai que c'est automatique mais il ne peux rien etre mis dans le
corps du message.
y a t il une autre solution pour qu'une copie de la feuille active me soit
envoyée mais en laissant la possibilité de me mettre quelques lignes de
commentaire dans le corps du mail
enfin que le dossier ne soit pas juste en attaché

merci