Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
148to152
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
148to152
148to152
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

E-Mail in Exel

E-Mail in Exel
22.08.2002 11:05:17
test
Hi
Ich möchte in einem Makro folgendes machen.
Neue E-Mailnachricht erstellen, Betreff und Empfänger werden an die E-Mail von Exel übergeben. Weiterhin soll ein Standarttext übergeben werden (string?). Zusätzlich sollen noch 2 Dateien angehängt werden (z.b. C:\Datei1.txt und C:\Datei2.txt)
Wie mache ich so etwas?
Die fertigerstelle E-Mail soll dann sichtbar auf dem Bildschirm sein, so dass man nur noch Senden klicken muss.(Kann man das senden auch noch automatisieren?)
THX

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Etwa so?
22.08.2002 11:32:40
BCM
Sub Mail_Senden()
Dim olApp As Object

Set olApp = CreateObject("Outlook.Application")
With olApp.CreateItem(0) ' Neue Mail erstellen
.Recipients.Add "Email@Adresse"
.Subject = "Testmail" ' Betreff setzen
.Body = "Mein Text" ' Text im Body
.ReadReceiptRequested = True ' Rückmeldung senden
.Attachments.Add "C:\test1.xls"
.Attachments.Add "C:\test2.xls"
'.Display ' Mail anzeigen
.Send ' Mail senden
End With
Set olApp = Nothing
End Sub

Re: Etwa so?
22.08.2002 11:37:56
test
yo sieht gut aus, hat mir richtig weitergeholfen.danke!
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige