HERBERS Excel-Forum - die Beispiele

Thema: Outlook-Maildialog aus UserForm aufrufen

Home

Gruppe

API

Problem

Aus einer UserForm soll auf SchaltflächenKlick Outlook mit dem Mail-Dialog aufgerufen werden.

Lösung
Geben Sie den nachfolgenden Code in die genannten Module.
ClassModule: frmMail

Private Sub cmdCancel_Click()
   Unload Me
End Sub

Private Sub cmdMail_Click()
   Call CallMail("hans@herber.de")
End Sub

StandardModule: Modul1

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 CallMail( _
   eMail As String)
   Call ShellExecute(0&, "Open", "mailto:" + eMail, "", "", 1)
End Sub

Sub CallForm()
   frmMail.Show
End Sub

Beiträge aus dem Excel-Forum zu den Themen API und Email

Excel Makro zum Email Versand aus Vorlagen-Excel Excel to Word Kapitel VBA
Anfangskapital berechnen Gestapelte Säulen-Diagramm: Ich kapier's nicht
Googel Maps API in Excel VBA einfügen Screenshot als Emailanhang
Fehler im VBA-Code - Excel per Email verschicken? Brauche Hilfe ! Copy Paste und Email Makro
Tabelle per Email- Versand unterbrechen Email automatisch aus Excel versenden
Email in Excel Bei erreichen eines best. Datums Email schicken
Bei erreichen eines best. Datums Email schicken Berechnung vom Endkapital
hyperlink als email mit betreff und cc aus spalte Tabelle teilen und dann per email versenden
Spalte mit email Adressen auslesen Outlook Email in Excel einlesen
HTML-eMailversand Commandbutton mit Emailaddi belegen
Tabellenblatt versenden, Email Text API? - xl-Parameter aus Long-Wert bestimmen
Berechnung Kapitalanlage Telefonnummer auslesen per TAPI
Aus Excel eine EMail generieren und senden Tabellenblatt per Email versenden
Email versenden ! Mails gehen nicht immer raus ? Exceltabelle per eMail senden
Läuft RSAPI.DLL mit WIN2000 und XP? Email an in Zelle muss weg
eMail JAVA API mit VBA verwenden
Tabellenblatt per eMail versenden Email Ansicht auf automaticgröße einstellen
Tabellenblatt via Email verschicken und speichern Systemunabhängige Email an mehrere Empfänger
Aktiviertes Sheet per Email senden Kommentar als Email versenden
Email versenden Probleme mit HYPERLINK-eMail / keine Zeilenumbrüc
Email automatisch drucken Excel-> Outlook Email Empfänger
email aus Outlookvorlage versenden Datei in Emailanhang
VBA: email-Versand aus Excel Datei in Emailanhang mit VBA oder Makro
Zelleninhalt als Email Betreff Benachrichtigung per email ???
Email & Internet Adresse email-Benachrichtigung bei Antwort?