Tipp: Andere Sprachen sind Google-Übersetzungen. Sie können die English Version dieses Links.
Einloggen
x
or
x
x
Registrieren
x

or

Wie öffne ich alle Unterordner in Outlook?

Wenn Sie mehrere Unterordner in Ihren Outlook-Ordnern erstellen, wie könnten Sie alle diese Unterordner sofort öffnen oder erweitern? In diesem Artikel werde ich einen nützlichen VBA-Code für Sie einführen, um diesen Job zu lösen.

Öffnen oder erweitern Sie alle Unterordner in Outlook mit VBA-Code


Öffnen oder erweitern Sie alle Unterordner in Outlook mit VBA-Code

Wenden Sie den folgenden VBA-Code an, um alle Unterordner aller Outlook-Konten zu erweitern:

1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. Klicken Sie Einsatz > Modul, und fügen Sie das folgende Makro in das Modulfenster ein.

VBA-Code: Öffnen Sie alle Unterordner in Outlook:

Sub ExpandAllMailFolders () Dim xCurrentFolder als Ordner Dim xAllFolders als Ordner Dim xFolder als Ordner bei Fehler Fortfahren Nächster Satz xCurrentFolder = Application.ActiveExplorer.CurrentFolder Set xAllFolders = Application.Session.Folders für jeden xFolder in xAllFolders Aufruf ProcessFolders ActiveExplorer.CurrentFolder = xCurrentFolder End Sub Sub ProcessFolders (ByVal CurFolder As Folder) Dim xSubfolder As Folder bei Fehler Fortsetzen, wenn CurFolder.DefaultItemType <> olMailItem dann beendet wird Beenden Sie dann Sub für jeden xSubfolder in CurFolder.Folders. Rufen Sie ProcessFolders (xSubfolder) Next End Sub auf

3. Dann drücken F5 Schlüssel, um diesen Code auszuführen, und alle Unterordner in allen Konten Ihres Outlook wurden erweitert, siehe Screenshot:

doc erweitert die Unterordner 1


Kutools for Outlook - bringt erweiterte 100-Funktionen in Outlook und erleichtert die Arbeit erheblich!

  • Auto CC / BCC durch Regeln beim Versenden von E-Mails; Automatische Weiterleitung Mehrere E-Mails nach Kundenwunsch; Automatische Antwort ohne Exchange Server und mehr automatische Funktionen ...
  • BCC Warnung - Nachricht anzeigen, wenn Sie versuchen, alle zu beantworten wenn Ihre E-Mail-Adresse in der BCC-Liste enthalten ist; Bei fehlenden Anhängen erinnernund weitere Erinnerungsfunktionen ...
  • Antworten (Alle) mit allen Anhängen in der E-Mail-Konversation; Antworten Sie auf viele E-Mails in Sekunden; Gruß automatisch hinzufügen wenn antworten; Datum in Betreff einfügen ...
  • Anhangstools: Alle Anhänge in allen Mails verwalten, Automatisch lösen, Alle komprimieren, Alle umbenennen, Alle speichern ... Schnellbericht, Ausgewählte Mails zählen...
  • Leistungsstarke Junk-E-Mails vom Brauch; Entfernen Sie doppelte Mails und Kontakte... Ermöglichen Sie es Ihnen, in Outlook intelligenter, schneller und besser zu arbeiten.
Schuss Kutools Outlook Kutools Tab 1180x121
schusskutools outlook kutools plus tab 1180x121
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Doug Fisher · 9 months ago
    I have been looking for this answer for a long time! Thank you.