Hallo.
Ich sollte ein Tabellenblatt kopieren und per E-Mail versenden.
Dies habe ich einfach so gemacht:
Sheets("Formular").Copy
ActiveWorkbook.SendMail "test@test.com", "Bestellung"
Application.DisplayAlerts = False
ActiveWindow.Close
Application.DisplayAlerts = True
Das klappt recht gut. Nur sollte ich dem neuen Tabellenblatt den Namen "Bestellung" geben UND einen Wert (Zelle) noch einzeln in das neue Tabellenblatt (vom kopierten) einfügen (Wichtig: NUR Wert mit Formatierung).
Habt ihr vielleicht einen Tip?
Gruß
Alex
|