Outlook-Mail - Leerzeilen und Signatur
Peter
Mit nachfolgendem Code erstelle ich ein Outlook-Mail mit Attachment.
Das klappt soweit gut.
Meine Probleme:
- Nach "Guten Tag" werden nicht eine Leerzeile (vbCrLf) eingefügt
- die sonst automatisch erscheinende Signatur wird unterdrückt.
Wer kann mir weiterhelfen?
Danke und Gruss, Peter
Set OutApp = CreateObject("Outlook.Application")
Set Nachricht = OutApp.CreateItem(0)
With Nachricht
.To = to_
.CC = cc_
.BCC = bcc_
.Subject = cpBet & " " & Date & " " & Time
.Attachments.Add AWS
'Hier wird eine normale Text Mail erstellt
'.Body = "Guten Tag!" & vbCrLf & vbCrLf & "Als Attachment erhalten Sie ........"
'Hier wird die HTML Mail erstellt
.HTMLBody = "Guten Tag!" & vbCrLf & vbCrLf & "Als Attachment erhalten Sie ........"
'Hier wird die Mail nochmals angezeigt
.Display
'Hier wird die Mail gleich in den Postausgang gelegt
'.Send (wird manuell ausgeführt)
End With