Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

email automatisch anstossen

Forumthread: email automatisch anstossen

email automatisch anstossen
Boris
moechte ueber einen CommandButton in einem EXCEL-UserForm
eine automatische email mit Informationen losschicken,
die ausgewaehlte daten aus einem excelworksheet enthaelt -
wie geht das am einfachsten ?
Gruss
Boris
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: email automatisch anstossen
Russi
Hallo Boris!
Lassen Deinen Button folgendes Makro aufrufen:
Private Declare

Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hwnd As Long, _
ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long

Sub MailVersenden()
Dim eMail$
Dim Subject$
Dim Body$
eMail = "Russi@daooze.de"
Subject = "Betreff"
Body = range("A1").value
Call ShellExecute(0&, "Open", "mailto:" + eMail + "?Subject=" + Subject + "&Body=" + Body, "1", "2", 1)
End Sub

Das sollte funktionieren.
Viele Grüße
Russi
Anzeige
AW: email automatisch anstossen
Boris
hi russi,
wie kriegts man hin, dass die email auch automatisch versandt wird ?
danke
boris
AW: email automatisch anstossen
29.03.2004 13:17:25
Russi
Klicke mit der rechten Maustaste auf den Button in Deiner Userform, wähle "Code anzeigen".
In das Modul schreibst Du dann "Call MailVersenden"
Meinen o.g. Code musst Du in ein Modul (Einfügen - Modul) einfügen.
Russi
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige