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

or

Sut i ddod o hyd i ffolder yn ôl enw yn Outlook?

Er enghraifft, rydych chi wedi creu llawer o ffolderau e-bost yn Outlook, pan fydd angen agor ffolder bersonol benodol, mae'n rhaid i chi ehangu ffolderi lluosog nes bod y ffolder benodol honno'n ymddangos. Mae'n drafferthus ehangu ffolderi lluosog fesul un dim ond ar gyfer agor ffolder bersonol benodol. Mewn gwirionedd, os ydych chi'n cofio enw'r ffolder, bydd popeth yn dod yn hawdd. Yn y tiwtorial hwn, byddwn yn darparu dull i chi ddod o hyd i ffolder yn ôl ei enw yn Outlook yn lle ehangu ffolderi fesul un i ddod o hyd i'r ffolder.

Dewch o hyd i ffolder yn ôl enw yn Outlook gyda chod VBA

Chwilio ffolder yn ôl enw ar draws cyfrifon yn Outlook gan Kutools am Outlooksyniad da3


swigen dde glas saeth Dewch o hyd i ffolder yn ôl enw yn Outlook gyda chod VBA

Gyda dilyn cod VBA, gallwch chi ddod o hyd i ffolder penodedig yn ôl ei enw.

Nodyn: Mae angen i chi gofio enw'r ffolder er mwyn defnyddio'r cod VBA hwn.

1. Gwasgwch y Alt + F11 allweddi ar y bysellfwrdd i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Yna cliciwch ddwywaith ar y Project1 > Gwrthrych Microsoft Outlook > ThisOutlookSession i agor y Prosiect1 - ThisOutlookSession ffenestr. Gweler y screenshot:

3. Copïwch a gludwch y cod VBA canlynol i mewn i ffenestr Project1 - ThisOutlookSession.

VBA: dewch o hyd i ffolder yn ôl enw

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. Yna pwyswch F5 allwedd ar y bysellfwrdd i redeg y cod VBA.

5. Yn y Macros blwch deialog, cliciwch y Run botwm.

6. Yn y popping up Chwilio Ffolder blwch deialog, teipiwch enw'r ffolder yn y blwch testun, yna cliciwch ar y OK botwm. Gweler y screenshot:

7. Yna a Microsoft Outlook blwch deialog yn ymddangos, mae'n dangos llwybr eich ffolder a ddymunir, ac yna cliciwch ar y Ydw botwm.

8. Yna bydd y ffolder e-bost penodedig yn cael ei agor ar unwaith.

Nodyn: Gellir cymhwyso'r cod VBA hwn i Outlook 2007, 2010 a 2013.


swigen dde glas saeth Chwilio ffolder yn ôl enw ar draws cyfrifon yn Outlook gan Kutools am Outlook

Os nad ydych chi'n dda am VBA, gallwch chi geisio Kutools ar gyfer Rhagolwg's Ewch i cyfleustodau, a all ddod o hyd i ffolder gydag enw neu gymeriad penodol arno, yna ewch yn uniongyrchol i'r ffolder

Kutools for Outlook , Yn cynnwys 100 nodweddion ac offer pwerus ar gyfer Microsoft Outlook 2016, 2013, 2010 ac Office 365.

Gosod am ddim Kutools ar gyfer Outlook, ac yna gwnewch fel isod y camau:

1. Cliciwch Kutools Plus > Ewch i.
doc dod o hyd i ffolder yn ôl enw 5

2. Yn y Ewch i deialog, teipiwch enw'r ffolder neu nodau penodol yn y bar chwilio, yna mae'r ffolderi cymharol wedi'u rhestru.
doc dod o hyd i ffolder yn ôl enw 6

3. Cliciwch ddwywaith ar enw'r ffolder rydych chi am fynd iddo a'i agor, yna mae'r ffolder ar agor.
doc dod o hyd i ffolder yn ôl enw 7


Kutools for Outlook - Yn Dod â 100 o Nodweddion Uwch i'w Rhagweld, a Gwneud Gwaith yn Haws Osgach!

  • Auto CC / BCC yn ôl rheolau wrth anfon e-bost; Auto Ymlaen E-byst Lluosog yn ôl arfer; Ymateb Auto heb weinydd cyfnewid, a nodweddion mwy awtomatig ...
  • Rhybudd BCC - dangoswch neges pan geisiwch ateb popeth os yw'ch cyfeiriad post yn rhestr BCC; Atgoffwch Wrth Ymlyniadau ar Goll, a mwy o nodweddion atgoffa ...
  • Ymateb (Pawb) Gyda'r Holl Atodiadau yn y sgwrs bost; Ateb Llawer o E-byst mewn eiliadau; Auto Ychwanegu Cyfarchiad wrth ateb; Ychwanegu Dyddiad i'r pwnc ...
  • Offer Ymlyniad: Rheoli Pob Atodiad ym mhob Post, Datgysylltiad Auto, Cywasgu Pawb, Ail-enwi Pawb, Arbed Pawb ... Adroddiad Cyflym, Cyfrif Postiau Dethol...
  • E-byst Sothach Pwerus yn ôl arfer; Tynnwch y Post a Chysylltiadau Dyblyg... Yn eich galluogi i wneud yn ddoethach, yn gyflymach ac yn well yn Outlook.
tab kutools rhagweld kutools tab 1180x121
kutools rhagweld rhagolygon kutools ynghyd â thab 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.
    Rohit · 4 years ago
    It looks great but I'm looking more folder with similar name....
  • To post as a guest, your comment is unpublished.
    John · 4 years ago
    I am currently working with Outlook 2013, and while this tool is wonderfully helpful, I'm in the same boat as Matt and Richard. I would like to be able to somehow go through multiple folders with the same name. I would also like to be able to do this: if I have multiple folders with dates, 2012,2013,2014 for example, I would like to be able to put in 20* or 20?? and then be prompted to view any of the aforementioned folders, instead of just defaulting to the first one it finds.
  • To post as a guest, your comment is unpublished.
    Rafi Schwarts · 4 years ago
    The line "Function FindInFolders(TheFolders As Outlook.Folders, Name As String)" is throwing a compile error message - User-defined type not defined
  • To post as a guest, your comment is unpublished.
    Rafi Schwarts · 4 years ago
    the line "Function FindInFolders(TheFolders As Outlook.Folders, Name As String)" is throwing a Compile error message: [b][u]User-defined type not defined[/u][/b]
  • To post as a guest, your comment is unpublished.
    Richard · 5 years ago
    Just like Matt wrote, I was also looking for this. The way the code operates is that it will open the first folder it finds with the name to search for. Is it possible to adjust the code so it will find multiple instances?
  • To post as a guest, your comment is unpublished.
    Matt · 5 years ago
    Is there a way to add folder iteration to the above code. Say the user has multiple folders named Employee, is it possible for it to go through a loop to find all instances and allow user to select appropriate folder?