Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
536to540
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
536to540
536to540
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

E-Mail aus Excel versenden

E-Mail aus Excel versenden
29.12.2004 13:51:12
Gallus
Ich möchte ein E-Mail aus Excel versenden. Folgenden Code habe ich gewählt:
ActiveWorkbook.SendMail Recipients:="m.a@bluewin.ch", Subject:="Offertenreporting"
Frage: Kann ich nebst dem Betreffvermerk (oben mit Subject:=" " eingetragen) auch noch Text ins E-Mail einfügen. Wie lautet der entsprechende Code?

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: E-Mail aus Excel versenden
Michael
Hallo Gallus,
ich verschicke meine Daten immer mit folgendem Makro:

Sub Sende()
Dim olApp, Mail As Object
Dim objNachrich As Object
Set olApp = CreateObject("Outlook.Application")
Set objNachrich = olApp.CreateItem(0)
Set Mail = objNachrich
Mail.To = "email@spammail.com"
Mail.Body = "Hallo XY," & Chr(10) & Chr(10) _
& "Bla Bla Bla." & Chr(10) & Chr(10) _
& "Gruß" & Chr(10) _
& "Versender" & Chr(10) & Chr(10)
Mail.Subject = "TESTMAIL"
Mail.Attachments.Add "C:\Daten\Datei.xls"
Mail.Display
End Sub

Gruß
Michael
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige