Office: VBA Mail.Body Text teiweise in Fett

Mike Forwell · 5. August 2019

Hallo Zusammen

ich stehe auf dem schlauch. wie bekomme ich es hin das Teile im Mail.Body fett geschrieben werden.

Aktuell sieht es so aus:

Sehr geehrte Damen und Herren,

am 14.08.2019 08:00:00 startet der Vorgang Artikelnummer Anlegen in Mention im Projekt Projekt VarioCall-3_V-002.mpp.
Bergander

Ich möchte es aber so haben:

Sehr geehrte Damen und Herren,

am 14.08.2019 08:00:00 startet der Vorgang Artikelnummer Anlegen im Projekt Projekt VarioCall-3_V-002.mpp.
Bergander

Hier den Code den ich verwende
Code:

Sub ProjectMail()
Dim Vorgang As Long, ATaskName As String, ATaskStart As String
Dim AProjectName As String

MyProject = AProjectName
Set outl = CreateObject("Outlook.Application")
Set Mail = outl.CreateItem(olMailItem)
Vorgang = ActiveCell.Task.ID
ATaskName = ActiveProject.Tasks(Vorgang).Name
ATaskStart = ActiveProject.Tasks(Vorgang).Start
AProjectName = ActiveProject.Name
ATaskRessourcen = ActiveProject.Tasks(Vorgang).ResourceNames
Mail.Subject = "Reminder: " & ATaskName
Mail.Body = "Sehr geehrte Damen und Herren," & Chr(13) & Chr(13) _
& "am " & ATaskStart & " startet der Vorgang " & ATaskName _
& " im Projekt " & AProjectName & "." & Chr(13) & Chr(13) _
& ATaskRessourcen
Mail.To = ""
Mail.CC = ""
Mail.Display
Set outl = Nothing
Set Mail = Nothing
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Kann mir bitte auf die sprünge helfen.

:)

knobbi38 · 7. August 2019

Hallo Mike,

für die Nachricht das HTML/RTF Format verwenden.
Siehe Beispiel bei: https://docs.microsoft.com/de-de/off...tem.bodyformat

Ulrich

Mike Forwell · 7. August 2019

Hallo Ulrich,

das verstehe ich nicht.

knobbi38 · 7. August 2019

Hallo Mike,
in einfachem Text gibt es keine Formatierungsmöglichkeiten, also auch keine Fettschrift. Dafür muß der Text im HTML Format vorliegen, dort gibt es solche Formatierungen, und dieser HTML-Text wird dann der .HTMLBody Eigenschaft anstatt der .Body Eigenschaft zugewiesen. HTML Formatierungen kennst du?

hier ein weiteres Beispiel:
https://docs.microsoft.com/de-de/off...litem.htmlbody

Gruß Ulrich

Mike Forwell · 7. August 2019

Vielen Dank,

ich habe es mittlerweile verstanden und auch umgesetzt bekommen.

DANKE

elmar · 7. August 2019

Dann bitte das Thema als erledigt kennzeichnen.

Office: VBA Mail.Body Text teiweise in Fett

VBA Mail.Body Text teiweise in Fett

VBA Mail.Body Text teiweise in Fett

VBA Mail.Body Text teiweise in Fett

VBA Mail.Body Text teiweise in Fett - Similar Threads - VBA Mail Body

emails per vba mit eigenem Ordner speichern

VBA eine Mail Empfänger aus Zellen ziehen

VBA Grafik in E-Mail einfügen

VBA bestimmte Mail Anhänge abspeichern funktioniert nur ab+zu

E-Mail per VBA

Outlook-Mail mit VBA: SendUsingAccount

VBA: Wenn der Wert >2 dann soll eine E-Mail versendet werden. Überprüfung von ca. 100 Zeilen.