Bonjour,
je suis a la recherche d'une solution pour envoyer un document words par email avec le VBA de words. quelqu'un peut il m'aider ?
@+ Vijeo
Bonjour,
je suis a la recherche d'une solution pour envoyer un document words par email avec le VBA de words. quelqu'un peut il m'aider ?
@+ Vijeo
La methode SendMail donne quoi ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part ActiveDocument.SendMail
Je veut bien faire un essai avec la methode send mail mais ou dois je renseigner les parametres du mail (adresse...)
@+ Vijeo
Essaie comme ça alors !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 Sub EnvoiMail() Dim oApp As Outlook.Application Dim MyIt As MailItem Dim myAtt As Attachment Set oApp = CreateObject("outlook.application") Set MyIt = oApp.CreateItem(olMailItem) Set myAtt = MyIt.Attachments.Add(ActiveDocument.FullName) MyIt.To = "nom@fai" MyIt.Subject = "Sujet de l'envoi" MyIt.BodyFormat = olFormatHTML MyIt.Body = "mon corps de message" MyIt.Send End Sub
Bonjour et merci
elle me plait ta solution mais comment faire pour que le body soit mon document word.
Remarque: je ne souhaite pas attacher le fichier word au mail
@+ vijeo
Voilà pour envoyer le texte d'un document en tant que corps de message.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25 Sub EnvoiMail() Dim oApp As Outlook.Application Dim MyIt As MailItem 'Dim myAtt As Attachment Dim stTemp As String Dim myRange As Range Set myRange = ActiveDocument.Range myRange.WholeStory myRange.Select stTemp = Selection.Text Set oApp = CreateObject("outlook.application") Set MyIt = oApp.CreateItem(olMailItem) 'Set myAtt = MyIt.Attachments.Add(ActiveDocument.FullName) MyIt.To = "olivier.lebeau@mil.be" MyIt.Subject = "Sujet de l'envoi" MyIt.BodyFormat = olFormatHTML MyIt.Body = stTemp MyIt.Send End Sub
je viens de faire l'essais effectivement cela fonctionne, mais s'il y a une image dans mon document elle n'apparait pas dans le mail envoyé
as tu une solution ?
@+ Vijeo
Il faut faire du html pour inclure une image.
je dois mal m'y prendre car meme en partant d'un document html cela ne fonctionne pas j'ai bien le texte mais pas les images
@+ Vijeo
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.
Partager