Neue Mail (nur Text) per Makro
03.02.2006 00:49:12
Jörg
ich habe eine Frage zum erstellen einer Mail per Makro. Mit folgendem Makro erstelle ich ein neue Mail:
Sub Mail()
Dim OutL As Object
Dim Mail As Object
Set OutL = CreateObject("Outlook.Application")
Set Mail = OutL.CreateItem(0)
With Mail
.Subject = "..."
.To = "Name"
.Body = "Beispiel text"
.Display
End With
End Sub
Das funktioniert soweit auch wunderbar. Allerdings wird die neue Mail immer im MS Rich-Text Format erstellt. Kennt jemand eine Möglichkeit, eine neue Mail im "nur Text" Format zu erstellen (Outlookvoreinstellung ist auf "nur Text" eingestellt)? Bin für jeden Hinweis dankbar!
MfG
Jörg