วิธีการแบทช์โฟลเดอร์ "รายการที่ถูกลบ" ทั้งหมดว่างเปล่าในบัญชีอีเมล Outlook ของคุณทั้งหมด

โซลูชัน Outlook September 29, 2025

หากคุณได้กำหนดค่าบัญชีอีเมลหลายบัญชีใน Outlook ของคุณและแต่ละบัญชีใช้ไฟล์ข้อมูล Outlook แยกกันคุณจะมีโฟลเดอร์“ รายการที่ถูกลบ” หลายโฟลเดอร์ เมื่อคุณต้องการล้างโฟลเดอร์“ รายการที่ถูกลบ” ในทุกบัญชีอีเมลคุณสามารถใช้โค้ด VBA ในบทความนี้ได้ อนุญาตให้คุณล้างข้อมูลเหล่านี้เป็นกลุ่ม

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

แบทช์ลบโฟลเดอร์“ รายการที่ถูกลบ” ทั้งหมดในบัญชีอีเมลทั้งหมด

ในตอนแรกให้เปิดโปรแกรม Outlook ของคุณ
จากนั้นกดปุ่ม“ Alt + F11” ในหน้าต่างหลักของ Outlook
ถัดไปในหน้าต่าง“ Microsoft Visual Basic for Applications” คุณต้องเปิดโมดูลเปล่า
จากนั้นคัดลอกและวางรหัส VBA ต่อไปนี้ลงในโมดูลนี้

Sub BatchEmptyAllDeletedItemsFolder()
    Dim objStores As Outlook.Stores
    Dim objStore As Outlook.Store
    Dim objPSTFile As Outlook.Folder
    Dim objFolders As Outlook.folders
    Dim objFolder As Object
 
    Set objStores = Outlook.Application.Session.Stores
 
    'Process all Outlook PST files in your Outlook
    For Each objStore In objStores
        Set objPSTFile = objStore.GetRootFolder
        For Each objFolder In objPSTFile.folders
            Call ProcessFolders(objFolder)
        Next
    Next
End Sub

Sub ProcessFolders(ByVal objCurrentFolder As Outlook.Folder)
    Dim i, n As Long
 
    If objCurrentFolder.Name = "Deleted Items" Then
       'Delete all the items in "Deleted Items" folder
       For i = objCurrentFolder.Items.Count To 1 Step -1
           objCurrentFolder.Items.Item(i).Delete
 
           'Delete all the subfolders under "Deleted Items" folder
           For n = objCurrentFolder.folders.Count To 1 Step -1
               objCurrentFolder.folders.Item(n).Delete
           Next
       Next
    End If
End Sub

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

ในเหตุการณ์ความเสียหายของ Outlook

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

บทนำผู้เขียน:

Shirley Zhang เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ แก้ไข sql และผลิตภัณฑ์ซอฟต์แวร์ซ่อมแซมแนวโน้ม ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.