Sub Blatt_senden()
Sheets("NAME").Copy
ActiveWorkbook.SendMail "PERSON@PROVIDER", "Aktuelle Zahlen"
Application.DisplayAlerts = False
ActiveWindow.Close
Application.DisplayAlerts = True
End Sub
Wie kann ich nun noch einen eMail-Text einfügen ?
Ich abrbeite mit Excel 2000
Danke und LG