Also .Subject = "Bl. " & ThisWorkbook.Sheet("Banf").Range("B9").Value & ", Kurztext"
Und der Fehler ist hier im Forum nicht sichtbar.
Genauso habe ich es drin stehen...
Achja sorry, den Fehler wollte ich schriftlich noch nachliefern!
Laufzeitfehler '438':
Objekt unterstützt diese Eigenschaft oder Methode nicht
Er zeigt mir dann auch genau das neu eingefügte als Fehler an.
Haha, ja mein Fehler. Das passiert, wenn man es einfach nur ins Forum schreibt, ohne es zu testen.
Da muss noch ein s an Sheet dran.
Also ThisWorkbook.Sheets(".....
Sorry
Es klappt
Danke danke danke! :)