Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 18:57:33
17.04.2024 16:56:58
Anzeige
Archiv - Navigation
784to788
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
784to788
784to788
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Outlook Starten

Outlook Starten
29.07.2006 17:05:13
Martin
Hallo,
ich möchte die Anwender meines Programms die Möglichkeit geben Fehler im Programm mir zu melden. Dazu soll sich Outlook starten, eine neue EMail anlegen. Meine Adresse soll gelich eingefügt sein, Im Betreff: soll stehen "Verbesserungsvorschläge und Fehlern", In der EMail selbst soll stehen "Hiermit möchte ich eine Verbesserung vorschlagen:" oder ähnliches. Der Anwender hat nun die Möglichkeit die Fehler zu beschreiben usw. Wenn er fertig ist, brauch er nur auf "Send" drucken und dann soll Outlook sich schliessen. Es sollen keine Anhänge beigefügt werden!

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

Betreff
Datum
Anwender
Anzeige
AW: Outlook Starten
29.07.2006 17:17:51
Josef
Hallo Martin!
Sub Mail_small_Text_Outlook()
Dim OutApp As Object
Dim OutMail As Object
Dim strbody As String


Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)

strbody = "Hiermit möchte ich eine Verbesserung vorschlagen:" & _
  vbNewLine & vbNewLine

With OutMail
  .To = "deineMailAdresse@dein.provider"
  .CC = ""
  .BCC = ""
  .Subject = "Verbesserungsvorschläge und Fehler"
  .Body = strbody
  .Display
End With

Set OutMail = Nothing
Set OutApp = Nothing

End Sub


Gruß Sepp

Anzeige
Danke Sepp
29.07.2006 17:24:48
Martin
Das war genau das was ich gesucht habe!

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige