Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema ListBox
BildScreenshot zu ListBox ListBox-Seite mit Beispielarbeitsmappe aufrufen

Von Excel aus neue Mail (outlook) öffnen

Betrifft: Von Excel aus neue Mail (outlook) öffnen von: Erich
Geschrieben am: 23.09.2014 12:20:56

Hallo,

ich möchte von Excel aus eine neue Mail (outlook) öffnen.
Das klappt auch, der Haken ist, dass mit folgenenden Befehlen

Set Nachricht = CreateObject("Outlook.Application")
Nachricht.CreateItem(0).Display
Nachricht.Activate
Nachricht.Subject = "Informationen zu XYZ"
Nachricht.To = AlleEmalAdressen
Nachricht.body = "Hallo zusammen, bald habe ich wieder Geburtstag und wollte Euch " & strName & " alle einladen."
Nachricht.show


die Mail geöffnet wird, ohne die Signatur einzutragen.
Wenn ich in Outlook direkt auf "neue Mail" klicke, öffnet sich aber ein Fenster
mit der vorbelegten Signatur.
Kann man das irgendwie hinbekommen, dass automatisch auch die Signatur benutzt wird?

Gruß Erich

  

Betrifft: AW: Von Excel aus neue Mail (outlook) öffnen von: Peter
Geschrieben am: 23.09.2014 13:47:52

Hallo

So sollte es funktionieren

    Dim myApp As Object
    Dim myMail As Object
    
    Set myApp = CreateObject("Outlook.Application")
    Set myMail = myApp.CreateItem(0)

    myMail.display
    
    myMail.Subject = "Informationen zu XYZ"
    myMail.To = "a.b@com"
    myMail.body = "Hallo zusammen, ...." & myMail.body



  

Betrifft: AW: Von Excel aus neue Mail (outlook) öffnen von: Erich
Geschrieben am: 23.09.2014 15:11:26

Danke Peter,
funktioniert.

Gruß Erich


 

Beiträge aus den Excel-Beispielen zum Thema "Von Excel aus neue Mail (outlook) öffnen"