Thema Datum  Von Nutzer Rating
Antwort
Rot VBAProject Outlook
 22.10.2024 16:40:17 GTA
NotSolved
22.10.2024 16:57:08 Gast26458
NotSolved
23.10.2024 22:58:34 GTA
NotSolved
24.10.2024 10:30:57 Gast15748
Solved

Ansicht des Beitrags:
Von:
GTA		 Datum:
22.10.2024 16:40:17		 Views:
129		 Rating:
     
Antwort:
  Ja
Thema:
VBAProject Outlook

Hallo liebe VBA Gemeinde

Ich habe mal wieder eine Frage und wäre froh um Expertenhilfe:

Ich möchte mittels Code alle Codes aus allen Outlook Modulen in ein Excelfile schreiben und speichern. 
Dabei brauche ich den richtigen Zugriff auf das Outlook Projekt. Das will irgendwie nicht hinhauen.

    Dim olApp As Object
    Dim olNamespace As Object
    Dim olVbaProject As Object
    Dim olVBComponent As Object
    Dim olCodeModule As Object

    ' Outlook via Late Binding starten
    On Error Resume Next
    Set olApp = GetObject(, "Outlook.Application")
    If olApp Is Nothing Then
        MsgBox "Outlook ist nicht geöffnet.", vbExclamation
        Exit Sub
    End If
    On Error GoTo 0

    ' Outlook VBA Projekt laden
    On Error Resume Next
    Set olVbaProject = olApp.VBE.VBProjects(1) ' Zugriff auf das Outlook VBA Projekt => Hier kommt die Fehlermeldung, da OlVbaProject leer bleibt. Wie muss ich den Zugriff richtig ansteuern?
    If olVbaProject Is Nothing Then
        MsgBox "Kein Zugriff auf das Outlook-VBA-Projekt. Bitte aktivieren Sie den Zugriff in den Sicherheitseinstellungen.", vbExclamation
        Exit Sub
    End If

Laut Microsoft liegt es an den Makroeinstellungen. Das stimmt aber nicht. Ist alles eingeschaltet.
Gruss

 

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 VBAProject Outlook
 22.10.2024 16:40:17 GTA
NotSolved
22.10.2024 16:57:08 Gast26458
NotSolved
23.10.2024 22:58:34 GTA
NotSolved
24.10.2024 10:30:57 Gast15748
Solved