Thema Datum  Von Nutzer Rating
Antwort
22.10.2018 11:25:24 Andreas Vogt
NotSolved
23.10.2018 01:10:44 Ulrich
NotSolved
23.10.2018 08:40:05 Andreas Vogt
NotSolved
23.10.2018 12:55:47 Ulrich
NotSolved
30.10.2018 10:43:17 Gast83887
NotSolved
30.10.2018 11:13:19 Ulrich
NotSolved
30.10.2018 11:36:17 Andreas Vogt
NotSolved
30.10.2018 12:22:25 Ulrich
NotSolved
30.10.2018 14:09:29 Andreas Vogt
NotSolved
30.10.2018 16:55:52 Ulrich
NotSolved
30.10.2018 17:16:31 Andreas Vogt
NotSolved
Blau Beschleunigen des Befüllens in ListBox (Formular schneller anzeigen)
30.10.2018 17:41:40 Ulrich
NotSolved
30.10.2018 17:46:16 Ulrich
NotSolved
30.10.2018 18:14:39 Gast98839
NotSolved
30.10.2018 23:57:46 Ulrich
NotSolved
31.10.2018 08:35:03 Andreas Vogt
NotSolved
31.10.2018 12:45:41 Ulrich
NotSolved
31.10.2018 12:57:13 Andreas Vogt
NotSolved
31.10.2018 16:07:21 Ulrich
NotSolved
31.10.2018 16:20:10 Andreas Vogt
NotSolved
31.10.2018 21:36:25 Ulrich
NotSolved
02.11.2018 10:11:32 Gast48059
NotSolved

Ansicht des Beitrags:
Von:
Ulrich
Datum:
30.10.2018 17:41:40
Views:
517
Rating: Antwort:
  Ja
Thema:
Beschleunigen des Befüllens in ListBox (Formular schneller anzeigen)

Hallo,

ich verstehe nicht richtig: benutzt du nicht den in MS-Office integrierten VBA-Editor (also Word öffnen => Alt+F11)?

Dort musst du unabhängig von Late- / Early Binding ein Objekt mit set zuweisen.

 

Early Binding:

    Dim OutApp As Object
    Dim OutMail As Object

    Set OutApp = CreateObject("Outlook.Application")
    Set OutMail = OutApp.CreateItem(0)
    
    With OutMail
        .to = "q@q.ql"
        .CC = ""
        .BCC = ""
        .Subject = "This is the Subject line"
        .Body = "Hi there"
        '.Attachments.Add ("C:\test.txt")
        .Send   'or use .Display
    End With

 

 

Bei Latebinding musst du den Verweis auf Microsoft Outlook xx.x-Objektbibliothek setzen:

    Dim OutApp As Outlook.Application
    Dim OutMail As Outlook.MailItem

    Set OutApp = new Outlook.Application
    Set OutMail = OutApp.CreateItem(0)
    
    With OutMail
        '...
    End With

Ale Codes sind ungetestet.

 

Visual Studio habe ich nie in Verbinund mit VBA benutzt, kann dir dazu also nichts sagen.

 

Grüße, Ulrich


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
22.10.2018 11:25:24 Andreas Vogt
NotSolved
23.10.2018 01:10:44 Ulrich
NotSolved
23.10.2018 08:40:05 Andreas Vogt
NotSolved
23.10.2018 12:55:47 Ulrich
NotSolved
30.10.2018 10:43:17 Gast83887
NotSolved
30.10.2018 11:13:19 Ulrich
NotSolved
30.10.2018 11:36:17 Andreas Vogt
NotSolved
30.10.2018 12:22:25 Ulrich
NotSolved
30.10.2018 14:09:29 Andreas Vogt
NotSolved
30.10.2018 16:55:52 Ulrich
NotSolved
30.10.2018 17:16:31 Andreas Vogt
NotSolved
Blau Beschleunigen des Befüllens in ListBox (Formular schneller anzeigen)
30.10.2018 17:41:40 Ulrich
NotSolved
30.10.2018 17:46:16 Ulrich
NotSolved
30.10.2018 18:14:39 Gast98839
NotSolved
30.10.2018 23:57:46 Ulrich
NotSolved
31.10.2018 08:35:03 Andreas Vogt
NotSolved
31.10.2018 12:45:41 Ulrich
NotSolved
31.10.2018 12:57:13 Andreas Vogt
NotSolved
31.10.2018 16:07:21 Ulrich
NotSolved
31.10.2018 16:20:10 Andreas Vogt
NotSolved
31.10.2018 21:36:25 Ulrich
NotSolved
02.11.2018 10:11:32 Gast48059
NotSolved