Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
404to408
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
404to408
404to408
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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

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

Links zu Excel-Dialogen

CommandButton UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige