sent un message par email sans joindre le fichier et sans feuille

Re : sent un message par email sans joindre le fichier et sans feuille

Bonjour à tous du forum,

Re:
résolu
après recherches j'en ai trouvé le vba code suivant, utilisé par Ron de Bruin :

Sub Mail_small_Text_Outlook()
'Working in Office 2000-2007
Dim OutApp As Object
Dim OutMail As Object
Dim strbody As String

Set OutApp = CreateObject("Outlook.Application")
OutApp.Session.Logon
Set OutMail = OutApp.CreateItem(0)

strbody = "Hi there" & vbNewLine & vbNewLine & _
"This is line 1" & vbNewLine & _
"This is line 2" & vbNewLine & _
"This is line 3" & vbNewLine & _
"This is line 4"

On Error Resume Next
With OutMail
.To = "__._____@com"
.CC = ""
.BCC = ""
.Subject = "This is the Subject line"
.Body = strbody
'You can add a file like this
'.Attachments.Add ("C:\test.txt")
.Display 'or use .Send
End With
On Error GoTo 0

Set OutMail = Nothing
Set OutApp = Nothing
End Sub

Re : sent un message par email sans joindre le fichier et sans feuille

Bonjour à tous du forum.

Est-ce possible d'envoyer un email par macro en ajoutant du texte avec autre format (en gras , en couleur,

Re:
annulé et posté par un nouveau sujet, comme ce sujet traitant d'autre format de texte en envoyant par email, ne noncerne pas le sujet posté initial.

news