Absätze im Mailversand funktionieren nic
22.03.2021 11:28:31
Sebastian
ich habe untenstehendes Sub geschrieben, welches Grundsätzlich auch so funktioniert. Möchte ich jetzt aber den Satz "neuer Vorgang" in die zweite Zeile der Mail schreiben klappt das nicht - hier wird seitens Programm immer der Fehler "erwartet Anweisungsende" gezeigt und genau der Bereich "neuer Vorgang" markiert.
Wo ist mein Gedankenfehler?
'Mail senden Schaltfläche4
Private Sub CommandButton4_Click()
Dim obNachricht As Object
Dim obMail As Object
Set obMail = CreateObject("Outlook.Application")
Set obNachricht = obMail.CreateItem(0)
With obNachricht
.To = "beispiel@beispiel.de"
.Subject = "neue Nummer" & " " & TextBox32.Value
.Body = "Hallo Name,"&vbLf&"neuerVorgang,"&vbLf&Textbox32.value&" "&textbox1.value
.display
End With
Set obNachricht = Nothing
Set obMail = Nothing
End Sub
Anzeige