Hallo,
ich generiere Termine per VBA in Microsoft Outlook. Das Problem ist, dass Outlook hinter jedem Termintext (Eigenschaft "body") ein Leerzeichen und ein Zeilenumbruch anhängt.
In Outlook selbst wird nur ein Leerzeichen angezeigt. Wenn ich die Eigenschaft unmittelbar nach dem Speichern auslese ist das sichtbar.
Kennt jemand das Verhalten und kennt jemand eine Lösung?
Gruß
Marc
Public Sub Testtermin()
Dim oOutl As Object
Dim olAppointmentItem As Object
Set oOutl = CreateObject("Outlook.Application")
Set olAppointmentItem = oOutl.CreateItem(1)
With olAppointmentItem
.Start = Format("12.12.2019", "dd.mm.yyyy") & " 08:00"
.Subject = "Test"
.Duration = 30
.body = "XXX"
.Save
End With
MsgBox olAppointmentItem.body & "Y" ' Hier kann man den Zeilenumbruch erkennen
Set apptOutApp = Nothing
Set OutApp = Nothing
End Sub
|