Note: The other languages of the website are Google-translated. Back to English
Inloggen  \/ 
x
or
x
Registreer  \/ 
x

or

Hoe snel naar de map met zoekresultaten gaan en deze openen in Outlook?

In Outlook kunt u met de zoekfunctie e-mails zoeken op basis van de specifieke tekst. Maar als u alle Outlook-items doorzoekt, kunt u de map met het zoekresultaat niet snel vinden. In dit geval heb ik hier enkele trucs die u kunnen helpen om snel naar de map met het zoekresultaat te gaan en deze te openen.

Ga naar en open de map met zoekresultaten met VBA

Ga naar en open de map met zoekresultaten met rechtsklikken


Ga naar en open de map met zoekresultaten met VBA

In Outlook is er geen ingebouwde functie die deze taak aankan, behalve VBA-code.

Voordat u de VBA-code gebruikt, moet u de mapnaam weergeven in de zoekresultaten.

1. klikken Bekijk > Voeg kolommen toe.
doc ga naar open map met zoekresultaat 1

2. In de Kolommen weergeven dialoog en in Selecteer beschikbare kolommen van vervolgkeuzelijst, selecteer Alle e-mailvelden, kies dan In map functie in het Beschikbare kolommen lijst.
doc ga naar open map met zoekresultaat 2

3. klikken Toevoegen toevoegen In mappen naar Geef deze kolommen in deze volgorde weer lijst en klik vervolgens op Ga OMHOOG knop om te bewegen In map naar de top.
doc ga naar open map met zoekresultaat 3

4. klikken OK om het dialoogvenster te sluiten. Terwijl u nu in e-mails zoekt, wordt de mapnaam weergegeven in de zoekresultaten.
doc ga naar open map met zoekresultaat 4

5. Druk nu op Alt + F11 toetsen om in te schakelen Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Module om een ​​nieuwe module te maken.

6. Kopieer en plak onderstaande code in de module.

VBA: ga naar de map met een naam

Sub FindFolderByName()
'UpdatebyExtendoffice20181105
    Dim xFldName As String
    Dim xFoundFolder As Folder
    Dim xYesNo As Integer
    On Error Resume Next
    xFldName = InputBox("Folder Name:", "Kutools for Outlook")
    If Len(Trim(xFldName)) = 0 Then Exit Sub
    Set xFoundFolder = ProcessFolders(Application.Session.Folders, xFldName)
    If xFoundFolder Is Nothing Then
        MsgBox "Not Found", vbInformation, "Kutools for Outlook"
        Exit Sub
    End If
    xYesNo = MsgBox("Activate Folder: " & vbCrLf & xFoundFolder.FolderPath, vbQuestion Or vbYesNo, "Kutools for Outlook")
    If xYesNo = vbNo Then Exit Sub
    Set Application.ActiveExplorer.CurrentFolder = xFoundFolder
End Sub
Function ProcessFolders(Flds As Outlook.Folders, Name As String)
    Dim xSubFolder As Outlook.MAPIFolder
    On Error Resume Next
    Set ProcessFolders = Nothing
    For Each xSubFolder In Flds
        If UCase(xSubFolder.Name) = UCase(Name) Then
            Set ProcessFolders = xSubFolder
            Exit For
        Else
            Set ProcessFolders = ProcessFolders(xSubFolder.Folders, Name)
            If Not ProcessFolders Is Nothing Then Exit For
        End If
    Next
End Function

7. druk op F5 toets om de code in te schakelen, voer nu de mapnaam in waarnaar u wilt gaan in het dialoogvenster.
doc ga naar open map met zoekresultaat 5

8. klikken OK, er verschijnt een dialoogvenster om u te herinneren aan de locatie van de map, klik op Ja om rechtstreeks naar de map te gaan, of klik op Nee annuleren.
doc ga naar open map met zoekresultaat 6


Ga naar en open de map met zoekresultaten met rechtsklikken

Als je Kutools for Outlook, er zal een Open folder hulpprogramma embed in het rechtsklikmenu dat snel naar de map van de geselecteerde e-mail kan gaan.

Kutools for Outlook , Inclusief 100+ krachtige functies en tools voor Microsoft Outlook 2016, 2013, 2010 en Office 365.

Gratis installatie Kutools voor Outlook en voer de onderstaande stappen uit:

Klik na het zoeken met de rechtermuisknop op het resultaat waarvan u de map wilt openen, selecteer Open folder vanuit het contextmenu.
doc ga naar open map met zoekresultaat 7


Kutools voor Outlook - Brengt 100 geavanceerde functies naar Outlook en maakt het werk veel gemakkelijker!

  • Auto CC / BCC volgens regels bij het verzenden van e-mail; Automatisch doorsturen Meerdere e-mails op maat; Auto antwoord zonder uitwisselingsserver, en meer automatische functies ...
  • BCC-waarschuwing - toon bericht wanneer u alle probeert te beantwoorden als uw e-mailadres in de BCC-lijst staat; Herinner bij ontbrekende bijlagen, en meer herinneren functies ...
  • Beantwoorden (alle) met alle bijlagen in het e-mailgesprek; Beantwoord veel e-mails in seconden; Begroeting automatisch toevoegen wanneer antwoord; Datum toevoegen aan onderwerp ...
  • Hulpmiddelen voor bijlagen: beheer alle bijlagen in alle e-mails, Automatisch loskoppelen, Alles comprimeren, Alles hernoemen, Alles opslaan ... Snel rapport, Tel geselecteerde e-mails...
  • Krachtige ongewenste e-mails op maat; Verwijder dubbele e-mails en contacten... Stel u in staat om slimmer, sneller en beter te doen in Outlook.
shot kutools outlook kutools tabblad 1180x121
shot kutools vooruitzichten kutools plus tabblad 1180x121
 
Say something here...
symbols left.
You are guest
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.
    Red McKenna · 2 years ago
    Deleted emails Folder
    • To post as a guest, your comment is unpublished.
      Sunny · 2 years ago
      Hi, Red McKenna, each account has each deleted forlder, it is called Deleted items.
  • To post as a guest, your comment is unpublished.
    Red McKenna · 2 years ago
    Where is the deleted email folder?