Wie finde ich einen Ordner nach Namen in Outlook?
Beispielsweise haben Sie in Outlook viele E-Mail-Ordner erstellt. Wenn ein bestimmter persönlicher Ordner geöffnet werden muss, müssen Sie mehrere Ordner erweitern, bis dieser angegebene Ordner angezeigt wird. Es ist mühsam, mehrere Ordner einzeln zu erweitern, nur um einen bestimmten persönlichen Ordner zu öffnen. Wenn Sie sich an den Ordnernamen erinnern, werden alle Dinge leicht. In diesem Lernprogramm erhalten Sie eine Methode zum Suchen des Ordners anhand seines Namens in Outlook, anstatt die Ordner einzeln zu erweitern, um den Ordner zu finden.
Suchen Sie den Ordner nach Namen in Outlook mit VBA-Code
Durchsuchen Sie den Ordner nach Namen über Konten in Outlook von Kutools nach Outlook
Suchen Sie den Ordner nach Namen in Outlook mit VBA-Code
Mit dem folgenden VBA-Code können Sie einen angegebenen Ordner leicht anhand seines Namens finden.
Note: Sie müssen sich den Ordnernamen merken, um diesen VBA-Code verwenden zu können.
1. Drücken Sie die Taste Andere + F11 Tasten auf der Tastatur zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. Doppelklicken Sie dann auf Project1 > Microsoft Outlook-Objekt > DieseOutlookSession öffnen Projekt1 - ThisOutlookSession Fenster. Siehe Screenshot:
3. Kopieren Sie den folgenden VBA-Code und fügen Sie ihn in das Fenster Project1 - ThisOutlookSession ein.
VBA: Ordner nach Namen suchen
Sub FindFolderByName()
Dim Name As String
Dim FoundFolder As Folder
Name = InputBox("Find Name:", "Search Folder")
If Len(Trim$(Name)) = 0 Then Exit Sub
Set FoundFouder = FindInFolders(Application.Session.Folders, Name)
If Not FoundFouder Is Nothing Then
If MsgBox("Activate Folder: " & vbCrLf & FoundFouder.FolderPath, vbQuestion Or vbYesNo) = vbYes Then
Set Application.ActiveExplorer.CurrentFolder = FoundFouder
End If
Else
MsgBox "Not Found", vbInformation
End If
End Sub
Function FindInFolders(TheFolders As Outlook.Folders, Name As String)
Dim SubFolder As Outlook.MAPIFolder
On Error Resume Next
Set FindInFolders = Nothing
For Each SubFolder In TheFolders
If LCase(SubFolder.Name) Like LCase(Name) Then
Set FindInFolders = SubFolder
Exit For
Else
Set FindInFolders = FindInFolders(SubFolder.Folders, Name)
If Not FindInFolders Is Nothing Then Exit For
End If
Next
End Function
4. Drücken Sie dann F5 Taste auf der Tastatur, um den VBA-Code auszuführen.
5. In dem Makros Klicken Sie im Dialogfeld auf die Schaltfläche Führen Sie .
6. Beim Auftauchen Ordner suchen Geben Sie im Dialogfeld den Ordnernamen in das Textfeld ein und klicken Sie auf OK Taste. Siehe Screenshot:
7. Dann a Microsoft Outlook Das Dialogfeld wird angezeigt. Es zeigt den Pfad Ihres gewünschten Ordners an und klicken Sie dann auf Ja .
8. Anschließend wird der angegebene E-Mail-Ordner sofort geöffnet.
Note: Dieser VBA-Code kann auf Outlook 2007, 2010 und 2013 angewendet werden.
Durchsuchen Sie den Ordner nach Namen über Konten in Outlook von Kutools nach Outlook
Wenn Sie nicht gut in VBA sind, können Sie es versuchen Kutools for Outlook's Gehe zu Dienstprogramm, das Ordner mit Namen oder bestimmten Zeichen finden und durchsuchen kann, und dann direkt zum Ordner wechselt
Kutools for Outlook , Enthält Leistungsstarke Funktionen und Tools für Microsoft Outlook 2016, 2013, 2010 und Office 365. |
||
Kostenlose Installation Kutools für Outlook, und führen Sie dann die folgenden Schritte aus:
1 Klicken Kutoolen Plus > Gehe zu.
2. In dem Gehe zu Geben Sie im Dialogfeld den Ordnernamen oder bestimmte Zeichen in die Suchleiste ein. Anschließend werden die entsprechenden Ordner aufgelistet.
3. Doppelklicken Sie auf den Ordnernamen, zu dem Sie wechseln möchten, und öffnen Sie den Ordner.
Demo
Beste Office-Produktivitätstools
Kutools for Outlook - Über 100 leistungsstarke Funktionen zur Optimierung Ihres Outlooks
🤖 KI-Mail-Assistent: Sofortige Profi-E-Mails mit KI-Magie – geniale Antworten mit einem Klick, perfekter Ton, mehrsprachige Beherrschung. Verwandeln Sie den E-Mail-Versand mühelos! ...
📧 E-Mail Automation: Abwesenheit (verfügbar für POP und IMAP) / Planen Sie das Senden von E-Mails / Automatisches CC/BCC nach Regeln beim E-Mail-Versand / Automatische Weiterleitung (erweiterte Regeln) / Begrüßung automatisch hinzufügen / Teilen Sie E-Mails mit mehreren Empfängern automatisch in einzelne Nachrichten auf ...
📨 E-Mail-Management: E-Mails einfach abrufen / Blockieren Sie betrügerische E-Mails nach Betreff und anderen / Doppelte E-Mails löschen / Erweiterte Suche / Ordner konsolidieren ...
📁 Anhänge Pro: Batch speichern / Stapeltrennung / Stapelkomprimierung / Automatisches Speichern / Automatische Trennung / Automatische Komprimierung ...
???? Schnittstellenmagie: 😊Mehr hübsche und coole Emojis / Steigern Sie Ihre Outlook-Produktivität mit Registerkartenansichten / Ausblick minimieren statt schließen ...
👍 Wunder mit einem Klick: Allen mit eingehenden Anhängen antworten / Anti-Phishing-E-Mails / 🕘Zeitzone des Absenders anzeigen ...
👩🏼🤝👩🏻 Kontakte und Kalender: Fügen Sie Kontakte aus ausgewählten E-Mails im Stapel hinzu / Teilen Sie eine Kontaktgruppe in einzelne Gruppen auf / Geburtstagserinnerungen entfernen ...
Auf über 100 Eigenschaften Warten Sie auf Ihre Erkundung! Klicken Sie hier, um mehr zu erfahren.