eMail via Outlook aus Excel-Makro. Wie?

Computer: Software & Programmierung Visual Basic
#1

Ich möchte, dass das aktive Tabellenblatt einer Excel-Arbeitsmappe via Makro als eMail verschickt wird.
Outlook ist installiert.
Das ganze läuft unter XP, Excel 2002, Modus sollte „Sendet Blatt als Textkörper“ sein.

Ich hoffe es kann mir jemand helfen,
Grüße aus Duisburg

Garvey

#2

Hallo
ich habe mich gerade da durchgearbeitet. Vervende doch einfach follgender Code.

dim text1 as String
text1 = MsgBox(„Wollen Sie diese Mappe via Mail versenden?“, vbYesNo, „E-Mail“)

If text1 7 Then
TDaten.Activate
On Error Resume Next
ActiveWorkbook.SendMail Recipients:=EMail, Subject:=text, returnreceipt:=False
End If

Freundliche Grüsse
Sebastian

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]