E-Mail im HTML Format

[Blubbfisch]

Hallo,

ich bin ja schon länger dabei ne E-Mail aus Excel heraus durch ein Makro zu versenden. Das schaffe ich auch mitlerweile mit diesem Code:

Set Outlook = CreateObject("Outlook.Application")
Set Message = Outlook.CreateItem(0)
With Message
Set Recipient = .Recipients.Add("name@company.de")
.Subject = "Betreff"
.Body = "Nachricht"
.send
End With

Ich würde jetz allerdings gerne eine E-mail im HTML-Format versenden. Mit meiner Variante wird nur eine textbasierende Mail verschickt.
Weiß jemand wie und was ich in meinen Code einbauen muss, damit eine HTML-basierende Mail verschickt wird? Wäre wirklich sehr cool !

Gruß
Blubbfisch

 

[Blubbfisch]

hat sich erledigt

 

[Yoah]

gibt's da jetzt ne Lösung?
Kannst sie ruhig mitteilen, wenn es sich erledigt hat!

 

[Blubbfisch]

jein, ne direkte lösung nicht, aber du kannst in outlook das html-format als standard einstellen und dann sind automatisch alle e-mails die du versendest im html format.
da geht bei
extras -> optionen -> e-mail format

 

[Shakie]

Ich würde mal spontan drauf tippen, dass man in die Eigenschaft "HTMLBody" einen HTMl-Text schreiben kann und die E-Mail dann zu einer HTML-E-Mail wird.

Dim Nachricht As Outlook.MailItem
Nachricht.HTMLBody = "Hier müsste jetzt HTML-Code stehen mit diesen seltsamen Steuerzeichen und so weiter und halt dem Text, aber ich kann leider kein HTML"

Edit: Ich hab das nicht ausprobiert, ich hab nur im Objektkatalog nachgeschaut, was ein MailItem für Eigenschaften hat.

 

[Blubbfisch]

scheint zu klappen, vielen dank!