bestimmten Unterordner eines bestimmten Postfaches in Outlook auslesen

[haiflosse]

Hallo!
Ich verwende folgenden Code um vom Standardpostfach einen Unterordner auszulesen.
Da ich jetzt mehrere Postfächer habe wollte ich fragen, wie ich dies von einem anderen "nicht Standard Postfach" durchführen kann.

Code [Auswählen] Erweitern

Set ol = New Outlook.Application
Set olNs = ol.GetNamespace("Mapi").GetDefaultFolder(olFolderInbox).Folders("postfach_standard").Folders("Unterordner")Danke für eine Antwort

[PhilS]

Schau dir mal das Namespace-Objekt im Objektkatalog genauer an.
Das hat die Folders- und die Accounts-Auflistungen, die beide zum Ziel führen können, je nachdem welche Informationen du hast, um das gesuchte Postfach zu identifizieren.

[haiflosse]

Danke konnte eine Lösung finden:

Code [Auswählen] Erweitern

For Each olNs In ol.GetNamespace("Mapi").Folders
    If olNs.Name = "Postfach" Then
    Set olSubVerz1 = olNs
    Exit For
    End If
    Next olNs
    If Not olSubVerz1 Is Nothing Then
    For Each olNs In olSubVerz1.Folders
    If olNs.Name = "Posteingang" Then
    Set olSubVerz2 = olNs
    Exit For
    End If
    Next olNs
    End If
    If Not olSubVerz2 Is Nothing Then
    For Each olNs In olSubVerz2.Folders
    If olNs.Name = "Unterordner" Then
    Set olSubVerz2 = olNs
    Exit For
    End If
    Next olNs
    End IfDanke für den Hinweis