Note: The other languages of the website are Google-translated. Back to English

Hur går jag snabbt till och öppnar mappen med sökresultat i Outlook?

I Outlook kan du söka på e-postmeddelanden baserat på den specifika texten med sökfunktionen. Men om du söker igenom alla Outlook-objekt kan du inte snabbt ta reda på mappen med sökresultatet. I det här fallet har jag här några knep som kan hjälpa dig att snabbt gå till och öppna mappen med sökresultatet.

Gå till och öppna mappen med sökresultat med VBA

Gå till och öppna mappen med sökresultat med högerklicka


Gå till och öppna mappen med sökresultat med VBA

I Outlook finns det ingen inbyggd funktion som kan hantera detta jobb, förutom VBA-kod.

Innan du använder VBA-koden måste du visa mappnamnet i de sökta resultaten.

1. klick utsikt > Lägg kolumner.
doc gå till den öppna mappen med sökresultat 1

2. I Visa kolumner dialog och in Välj tillgängliga kolumner från rullgardinsmenyn, välj Alla e-postfältOch välj sedan I mapp i Tillgängliga kolumner lista.
doc gå till den öppna mappen med sökresultat 2

3. klick Lägg till att lägga I mappar till Visa dessa kolumner i den här ordningen och klicka sedan på Flytta upp knappen för att flytta I mapp till toppen.
doc gå till den öppna mappen med sökresultat 3

4. klick OK för att stänga dialogen. Medan du söker efter e-post visas mappnamnet i sökresultaten.
doc gå till den öppna mappen med sökresultat 4

5. Tryck nu på Alt + F11 för att aktivera Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulerna för att skapa en ny modul.

6. Kopiera och klistra in koden nedan i modulen.

VBA: Gå till mappen med ett namn

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. Tryck F5 för att aktivera koden, ange nu mappnamnet du vill gå till i dialogrutan.
doc gå till den öppna mappen med sökresultat 5

8. klick OK, en dialogruta dyker upp för att påminna dig om platsen för mappen, klicka Ja för att direkt gå till mappen, eller klicka på Nej att avbryta.
doc gå till den öppna mappen med sökresultat 6


Gå till och öppna mappen med sökresultat med högerklicka

Om du har Kutools för Outlookkommer det att finnas en Öppen mapp verktyg bädda in i högerklickmenyn som snabbt kan gå till mappen för det valda e-postmeddelandet.

Kutools for Outlook , Inkluderar 100 + kraftfulla funktioner och verktyg för Microsoft Outlook 2016, 2013, 2010 och Office 365.

Gratis installation Kutools för Outlook och gör sedan nedanstående steg:

Efter sökning högerklickar du på det resultat du vill öppna mappen och väljer Öppen mapp från snabbmenyn.
doc gå till den öppna mappen med sökresultat 7


Kutools for Outlook - ger 100 avancerade funktioner till Outlook och gör arbetet mycket enklare!

  • Auto CC / BCC enligt regler när du skickar e-post; Automatisk vidarebefordran Flera e-postmeddelanden efter anpassning; Auto-svar utan växelserver och mer automatiska funktioner ...
  • BCC-varning - visa meddelande när du försöker svara på alla om din e-postadress finns i BCC-listan; Påminn när du saknar bilagor, och mer påminna om funktioner ...
  • Svara (alla) med alla bilagor i e-postkonversationen; Svara många e-postmeddelanden inom sekunder; Lägg automatiskt till hälsning när svar Lägg till datum i ämnet ...
  • Bilagverktyg: Hantera alla bilagor i alla e-postmeddelanden, Auto Lossa, Komprimera alla, Byt namn på alla, Spara alla ... Snabbrapport, Räkna valda mejl...
  • Kraftfulla skräppost efter anpassning; Ta bort duplicerade e-postmeddelanden och kontakter... Gör det möjligt för dig att göra smartare, snabbare och bättre i Outlook.
shot kutools outlook kutools flik 1180x121
shot kutools outlook kutools plus flik 1180x121
 
Sortera kommentarer efter
Kommentarer (4)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Var är den raderade e-postmappen?
Denna kommentar minimerades av moderatoren på webbplatsen
Raderade e-postmapp
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, Red McKenna, varje konto har raderade förlder, det kallas för borttagna objekt.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej killar,
Kommer detta att rulla mapprutan också? För det mesta är mappen vald men mappplatsen rullas inte till i mapprutan?
Skål,

Det finns inga kommentarer här ännu
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0   Tecken
Föreslagna platser

Följ oss

Copyright © 2009 - www.extendoffice.com. | Alla rättigheter förbehållna. Drivs av ExtendOffice. | | Sitemap
Microsoft och Office-logotypen är varumärken eller registrerade varumärken som tillhör Microsoft Corporation i USA och / eller andra länder.
Skyddad av Sectigo SSL