Wie öffnet man einen bestimmten Outlook-Ordner aus Excel?
Haben Sie jemals versucht, einen bestimmten Outlook-Ordner aus einer Excel-Datei zu öffnen, wie zum Beispiel den Ordner "Posteingang", den Ordner "Kontakte" oder einen anderen Ordner? In diesem Artikel werde ich darüber sprechen, wie man einen gewünschten Outlook-Ordner aus einer Excel-Arbeitsmappe öffnet.
Öffnen eines bestimmten Outlook-Ordners aus einer Excel-Datei mit VBA-Code
Öffnen eines bestimmten Outlook-Ordners aus einer Excel-Datei mit VBA-Code
Der folgende VBA-Code kann Ihnen helfen, einen bestimmten Outlook-Ordner aus einem Excel-Arbeitsblatt zu öffnen. Bitte führen Sie diese Schritte aus:
1. Halten Sie in Excel die Tasten "Alt" + "F11" gedrückt, um das Fenster "Microsoft Visual Basic for Applications" zu öffnen.
2. Klicken Sie auf "Einfügen" > "Modul" und fügen Sie das folgende Makro im "Modulfenster" ein.
VBA-Code: Öffnen eines bestimmten Outlook-Ordners aus einer Excel-Datei:
Sub OpenOutlookFolder()
Dim xOutlookApp As Outlook.Application
Dim xNameSpace As Outlook.Namespace
Dim xFolder As Outlook.Folder
Dim xFolderType As OlDefaultFolders
On Error Resume Next
Set xOutlookApp = New Outlook.Application
Set xNameSpace = xOutlookApp.Session
Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox)
xFolder.Display
Set xFolder = Nothing
Set xNameSpace = Nothing
Set xOutlookApp = Nothing
Exit Sub
End Sub
Hinweis: Im obigen Code können Sie "Posteingang" im Skript "Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox)" in einen beliebigen anderen Ordnernamen ändern, den Sie öffnen möchten.
3. Klicken Sie dann im Fenster "Microsoft Visual Basic for Applications" auf "Extras" > "Verweise" und aktivieren Sie im erscheinenden Dialogfeld "Verweise - Projekt1" die Option "Microsoft Outlook Object Library" aus der Liste der verfügbaren Verweise. Siehe Screenshot:
4. Klicken Sie anschließend auf "OK", um das Dialogfeld zu schließen, und drücken Sie die Taste "F5", um den Code auszuführen. Der angegebene Outlook-Ordner wird sofort geöffnet.
Beste Office-Produktivitätstools
Eilmeldung: Kutools für Outlook startet kostenlose Version!
Erleben Sie die brandneue kostenlose Version von Kutools für Outlook mit über70 unglaublichen Funktionen, die Sie FÜR IMMER nutzen können! Klicken Sie jetzt, um herunterzuladen!
📧 E-Mail-Automatisierung: Automatische Antwort (Verfügbar für POP und IMAP) / E-Mails senden planen / Automatische CC/BCC nach Regeln beim Senden von E-Mails / Automatische Weiterleitung (Erweiterte Regeln) / Automatische Begrüßung hinzufügen / Automatisches Aufteilen von E-Mails mit mehreren Empfängern in einzelne Nachrichten ...
📨 E-Mail-Management: E-Mails zurückrufen / Betrugs-E-Mails nach Betreff und anderen blockieren / Duplikate E-Mails löschen / Erweiterte Suche / Ordner organisieren ...
📁 Anhänge Pro: Stapelspeichern / Stapelablösen / Stapelkomprimieren / Automatisch speichern / Automatisch abtrennen / Automatische Komprimierung ...
🌟 Interface Magic: 😊Mehr hübsche und coole Emojis / Erinnern Sie, wenn wichtige E-Mails kommen / Outlook minimieren statt schließen ...
👍 Ein-Klick-Wunder: Allen mit Anhängen antworten / Anti-Phishing-E-Mails / 🕘Zeitzone des Absenders anzeigen ...
👩🏼🤝👩🏻 Kontakte & Kalender: Kontakte aus ausgewählten E-Mails stapelweise hinzufügen / Eine Kontaktgruppe in einzelne Gruppen aufteilen / Geburtstagserinnerung entfernen ...
