Clever-Excel-Forum

Guten Abend!

Ich habe einen Code in einem Buch gefunden (Bernd Held - VBA mit Excel) mit dem ich eine einzelne Excel Tabelle als Outlook Anhang verschicken kann:

Code:
Private Sub CommandButton2_Click()

Application.DisplayAlerts = False

Worksheets("Mappe1").Copy

ActiveWorkbook.SaveAs "TEST", FileFormat:=52

Application.Dialogs(xlDialogSendMail).Show _

"user.user@web.de", "TEST"

ActiveWorkbook.Close

Application.DisplayAlerts = True

End sub

Leider finde ich dort keinen Hinweiß darauf wie ich in die Mail noch einen Text einfügen kann (Also ein- oder zwei Zeilen Erläuterung zur Datei).

Habt ihr eine Idee, was ich hinzufügen müsste?

Danke & noch nen schönen Abend
simon

Hallo simonexcel,

Zitat: Leider finde ich dort keinen Hinweiß darauf wie ich in die Mail noch einen Text einfügen kann (Also ein- oder zwei Zeilen Erläuterung zur Datei).

Bei dieser Methode geht Outlook auf und Du kannst direkt dein Text verfassen?

Wenn Du es dennoch über einen Code realisieren möchtest, gibt es zu diesem Thema im Web Treffer en masse.
(Vermutlich auch der Grund warum du bisher keine Antworten bekommen hast)

Beispiel 1 von n:

Code:
http://www.herber.de/forum/archiv/336to340/337065_email.html

gruß
Marco

simonexcel

Mase