hallo und guten abend,
ich nutze den untenstehenden code um aus einer mappe einzelne tabellenblätter per mail zu verschicken.
die betreffzeile wird hier ja gefüllt, ist es auch möglich, das in der email sofort der text steht.
z.b. sehr geehrter herr blablabla,
anbei die …
mfg
mustermann
kann mir jemand helfen.
gruß und danke
jürgen
Sub Blatt()
ActiveSheet.Range(„A1:f127“).Select
Sheets(„test“).Copy
ActiveWorkbook.SendMail „test@testde“, „betreffzeile“
Application.DisplayAlerts = False
ActiveWindow.Close
Application.DisplayAlerts = True
End Sub