ไปยังเนื้อหาหลัก

จะค้นหาโฟลเดอร์ตามชื่อใน Outlook ได้อย่างไร?

ตัวอย่างเช่นคุณได้สร้างโฟลเดอร์อีเมลจำนวนมากใน Outlook เมื่อจำเป็นต้องเปิดโฟลเดอร์ส่วนบุคคลที่ระบุคุณต้องขยายหลายโฟลเดอร์จนกว่าโฟลเดอร์ที่ระบุนั้นจะปรากฏขึ้น เป็นการยากที่จะขยายหลายโฟลเดอร์ทีละโฟลเดอร์เพื่อเปิดโฟลเดอร์ส่วนตัวที่ระบุ จริงๆแล้วถ้าคุณจำชื่อโฟลเดอร์ได้ทุกอย่างจะกลายเป็นเรื่องง่าย ในบทช่วยสอนนี้เราจะให้วิธีการค้นหาโฟลเดอร์ตามชื่อใน Outlook แทนการขยายโฟลเดอร์ทีละโฟลเดอร์เพื่อค้นหาโฟลเดอร์

ค้นหาโฟลเดอร์ตามชื่อใน Outlook ด้วยรหัส VBA

ค้นหาโฟลเดอร์ตามชื่อในบัญชีต่างๆใน Outlook โดย Kutools for Outlookความคิดที่ดี 3


ลูกศรสีฟ้าฟองขวา ค้นหาโฟลเดอร์ตามชื่อใน Outlook ด้วยรหัส VBA

ด้วยรหัส VBA ต่อไปนี้คุณสามารถค้นหาโฟลเดอร์ที่ระบุตามชื่อได้อย่างง่ายดาย

หมายเหตุ: คุณต้องจำชื่อโฟลเดอร์เพื่อใช้รหัส VBA นี้

1 กด อื่น ๆ + F11 บนแป้นพิมพ์เพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. จากนั้นดับเบิลคลิกที่ไฟล์ Project1 > วัตถุ Microsoft Outlook > นี้OutlookSession เพื่อเปิด Project1 - ThisOutlookSession หน้าต่าง. ดูภาพหน้าจอ:

3. คัดลอกและวางโค้ด VBA ต่อไปนี้ลงในหน้าต่าง Project1 - ThisOutlookSession

VBA: ค้นหาโฟลเดอร์ตามชื่อ

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. จากนั้นกด F5 บนแป้นพิมพ์เพื่อเรียกใช้รหัส VBA

5 ใน แมโคร ใหคลิกปุ the ม วิ่ง ปุ่ม

6. ในการโผล่ขึ้นมา ค้นหาโฟลเดอร์ โปรดพิมพ์ชื่อโฟลเดอร์ในกล่องข้อความจากนั้นคลิกไฟล์ OK ปุ่ม. ดูภาพหน้าจอ:

7. จากนั้นก Microsoft Outlook กล่องโต้ตอบจะปรากฏขึ้นจะแสดงเส้นทางของโฟลเดอร์ที่คุณต้องการจากนั้นคลิกที่ไฟล์ ใช่ ปุ่ม

8. จากนั้นโฟลเดอร์อีเมลที่ระบุจะเปิดขึ้นทันที

หมายเหตุ: รหัส VBA นี้สามารถใช้ได้กับ Outlook 2007, 2010 และ 2013


ลูกศรสีฟ้าฟองขวา ค้นหาโฟลเดอร์ตามชื่อในบัญชีต่างๆใน Outlook โดย Kutools for Outlook

หากคุณไม่เก่ง VBA คุณสามารถลอง Kutools สำหรับ Outlook's ไปที่ ยูทิลิตี้ซึ่งสามารถค้นหาและค้นหาโฟลเดอร์ที่มีชื่อหรืออักขระเฉพาะจากนั้นไปที่โฟลเดอร์โดยตรง

Kutools for Outlook , รวมถึง คุณสมบัติและเครื่องมือที่มีประสิทธิภาพสำหรับ Microsoft Outlook 2016, 2013, 2010 และ Office 365

ติดตั้งฟรี Kutools สำหรับ Outlook แล้วทำตามขั้นตอนด้านล่าง:

1 คลิก Kutools พลัส > ไปที่.
doc ค้นหาโฟลเดอร์ตามชื่อ 5

2 ใน ไปที่ ให้พิมพ์ชื่อโฟลเดอร์หรืออักขระเฉพาะในแถบค้นหาจากนั้นโฟลเดอร์ที่สัมพันธ์กันจะเป็นรายการ
doc ค้นหาโฟลเดอร์ตามชื่อ 6

3. ดับเบิลคลิกที่ชื่อโฟลเดอร์ที่คุณต้องการไปและเปิดจากนั้นโฟลเดอร์จะเปิดขึ้น
doc ค้นหาโฟลเดอร์ตามชื่อ 7


สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

Kutools สำหรับ Outlook - คุณสมบัติอันทรงพลังมากกว่า 100 รายการเพื่อเติมพลังให้กับ Outlook ของคุณ

📧 การทำงานอัตโนมัติของอีเมล: ไม่อยู่ที่สำนักงาน (ใช้ได้กับ POP และ IMAP)  /  กำหนดการส่งอีเมล  /  Auto CC/BCC ตามกฎเมื่อส่งอีเมล  /  ส่งต่ออัตโนมัติ (กฎขั้นสูง)   /  เพิ่มคำทักทายอัตโนมัติ   /  แบ่งอีเมลผู้รับหลายรายออกเป็นข้อความส่วนตัวโดยอัตโนมัติ ...

📨 การจัดการอีเมล์: เรียกคืนอีเมลได้อย่างง่ายดาย  /  บล็อกอีเมลหลอกลวงตามหัวเรื่องและอื่นๆ  /  ลบอีเมลที่ซ้ำกัน  /  การค้นหาขั้นสูง  /  รวมโฟลเดอร์ ...

📁 ไฟล์แนบโปรบันทึกแบทช์  /  การแยกแบทช์  /  การบีบอัดแบบแบตช์  /  บันทึกอัตโนมัติ   /  ถอดอัตโนมัติ  /  บีบอัดอัตโนมัติ ...

🌟 อินเตอร์เฟซเมจิก: 😊อีโมจิที่สวยและเจ๋งยิ่งขึ้น   /  เพิ่มประสิทธิภาพการทำงาน Outlook ของคุณด้วยมุมมองแบบแท็บ  /  ลดขนาด Outlook แทนที่จะปิด ...

???? เพียงคลิกเดียวสิ่งมหัศจรรย์: ตอบกลับทั้งหมดด้วยไฟล์แนบที่เข้ามา  /   อีเมลต่อต้านฟิชชิ่ง  /  🕘 แสดงโซนเวลาของผู้ส่ง ...

👩🏼‍🤝‍👩🏻 รายชื่อและปฏิทิน: แบทช์เพิ่มผู้ติดต่อจากอีเมลที่เลือก  /  แบ่งกลุ่มผู้ติดต่อเป็นกลุ่มแต่ละกลุ่ม  /  ลบการแจ้งเตือนวันเกิด ...

เกิน คุณสมบัติ 100 รอการสำรวจของคุณ! คลิกที่นี่เพื่อค้นพบเพิ่มเติม

 

 

Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi, 6 years later but have same issues as raised by the others. I once had this code but sadly lost it. Any ideas (i will try AI)
This comment was minimized by the moderator on the site
It looks great but I'm looking more folder with similar name....
This comment was minimized by the moderator on the site
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.
This comment was minimized by the moderator on the site
The line "Function FindInFolders(TheFolders As Outlook.Folders, Name As String)" is throwing a compile error message - User-defined type not defined
This comment was minimized by the moderator on the site
the line "Function FindInFolders(TheFolders As Outlook.Folders, Name As String)" is throwing a Compile error message: User-defined type not defined
This comment was minimized by the moderator on the site
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?
This comment was minimized by the moderator on the site
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?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations