Thema Datum  Von Nutzer Rating
Antwort
Rot Wirkung von CreateObject und CreateItem(0)
11.10.2018 16:44:49 Tobi
NotSolved
11.10.2018 20:31:01 Mackie
NotSolved
11.10.2018 20:49:57 Tobi
NotSolved
11.10.2018 20:54:55 Tobi
NotSolved
11.10.2018 21:04:36 Mackie
NotSolved
11.10.2018 21:00:13 Mackie
*****
NotSolved
11.10.2018 22:22:31 Tobi
NotSolved

Ansicht des Beitrags:
Von:
Tobi
Datum:
11.10.2018 16:44:49
Views:
1060
Rating: Antwort:
  Ja
Thema:
Wirkung von CreateObject und CreateItem(0)

Hallo,

ich habe heute den unten stehen Code gefunden und verstehe an 2 Stellen die Funktionsweise nicht:

 

1. CreateObject("Outlook.Application"): Meiner Objektvariable "OutlookApplication" wird ja hier das Objekt "CreateObject("Outlook.Application") " zugewiesen. Aber was genau für ein Objekt ist das? Ist das die E-Mail? 

2. OutlookApplication.CreateItem(0) Hier wird ein Item erstellt? Aber wieso "0" und was wird hier erstellt?


Ich danke vielmals im Voraus für eure Hilfe!

 

 

Sub Mailversandtest()
Dim Nachricht As Object, OutlookApplication As Object
Set OutlookApplication = CreateObject("Outlook.Application") '???
Dim Anhang As String
Anhang = ThisWorkbook.FullName 
Set Nachricht = OutlookApplication.CreateItem(0) '??? was macht das CreateItem 0? und wieso "0"?
With Nachricht
.To = "Tobi.Haus@gmaills.com"
.Subject = "Hi"
.attachments.Add Anhang
.Body = "Test"
.Display
End With
Set OutlookApplication = Nothing
Set Nachricht = Nothing
End Sub


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Wirkung von CreateObject und CreateItem(0)
11.10.2018 16:44:49 Tobi
NotSolved
11.10.2018 20:31:01 Mackie
NotSolved
11.10.2018 20:49:57 Tobi
NotSolved
11.10.2018 20:54:55 Tobi
NotSolved
11.10.2018 21:04:36 Mackie
NotSolved
11.10.2018 21:00:13 Mackie
*****
NotSolved
11.10.2018 22:22:31 Tobi
NotSolved