EMAIL senden
03.02.2005 14:30:37
Gisela
das Makro funktioniert. Nur muss ich "Datei senden" immer noch anklicken.
Wie kann ich das direkt über das Makro ausführen lassen - oder was muss ich ändern - sodass die Tabelle ohne weitere Klick versendet wird?
Hier mein Makro:
Sub Tabellesenden()
ActiveWorkbook.Worksheets("Aktuell").Copy
Application.Dialogs(xlDialogSendMail).Show Range("B2"), "Korrektur"
ActiveWorkbook.Close savechanges:=False
End Sub
Danke für die Hilfe
Grüße
Gisela
Anzeige