Hallo ihr Kenner,
wie immer vertraue ich auf eure professionelle Hilfe…
Ich habe es nunendlich geschafft, ein Code zu schreiben (der sogar noch funktioniert!) um Outlook zu öffnen und schon mal Emailadresse sowie den Betreff korrekt anzeigen zu lassen…
Der Code sieht wie folgt aus:
Private Sub Befehl30_Click()
Dim olAppOutlook As Outlook.Application
Dim oItem As Outlook.MailItem
Set olApp = New Outlook.Application
Set oItem = olApp.CreateItem(olMailItem)
With oItem
.To = Mail
.Subject = „Auswertung“
.Body = „Anbei die Auswertung Ihres Test“
.Display
End With
End Sub
Soweit… Nun möchte ich dass auch noch „Sehr geehrte Frau + Name (oder Sehr geehrter Herr+Name, falls männlich),“ im Textkörper einbinden.
Kann mir jemand helfen??
Vielen Dank!! und noch ein schönen Nachmittag an alle!!
Silke