วิธีการย้ายรายการในโฟลเดอร์ไปยังโฟลเดอร์หลักโดยอัตโนมัติก่อนที่จะลบใน Outlook

แบ่งปันเลย:

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

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

ย้ายรายการในโฟลเดอร์ไปยังโฟลเดอร์หลักโดยอัตโนมัติก่อนที่จะลบออก

  1. เริ่มต้นด้วยการเข้าถึงโปรแกรมแก้ไข Outlook VBA ผ่านทาง“ Alt + F11”
  2. จากนั้นในหน้าต่างใหม่เปิดโครงการ“ ThisOutlookSession”
  3. จากนั้นคัดลอกและวางรหัส VBA ต่อไปนี้ลงในโครงการนี้
'Display the macro in the context menu
Sub Application_FolderContextMenuDisplay(ByVal CommandBar As Office.CommandBar, ByVal Folder As Outlook.Folder)
    Dim objCommandBarButton As Office.CommandBarButton
 
    Set objCommandBarButton = CommandBar.Controls.Add(msoControlButton)
    With objCommandBarButton
         .Style = msoButtonIconAndCaption
         .Caption = "[Smart] Delete Folder"
         .FaceId = 1668
         .OnAction = "Project1.ThisOutlookSession.DeleteFolder_MoveItemsToParentFolder"
    End With
End Sub

Sub DeleteFolder_MoveItemsToParentFolder()
    Dim objCurrentFolder As Outlook.Folder
    Dim objParentFolder As Outlook.Folder

    Set objCurrentFolder = Outlook.ActiveExplorer.CurrentFolder
    Set objParentFolder = objCurrentFolder.Parent
    
    Dim i As Long
    'Move items to parent folder
    For i = objCurrentFolder.Items.Count To 1 Step -1
        objCurrentFolder.Items.Item(i).Move objParentFolder
    Next
 
    'Delete the current folder
    objCurrentFolder.Delete
End Sub

คัดลอกโค้ดลงในโครงการ ThisOutlookSession

  1. หลังจากนั้นคุณสามารถยิงได้ทันที
  2. ในตอนแรกให้คลิกขวาที่โฟลเดอร์ย่อยที่คุณต้องการลบ
  3. จากเมนูบริบทให้เลือกตัวเลือก“ [Smart] Delete Folder”สมาร์ทลบโฟลเดอร์
  4. ในครั้งเดียว Outlook จะลบโฟลเดอร์และย้ายรายการไปยังโฟลเดอร์หลัก
  5. ในกรณีของฉันฉันลบโฟลเดอร์ย่อย“ ถึง Bob” โฟลเดอร์หลักคือ "รายการที่ส่ง" ดังนั้นรายการทั้งหมดจึงถูกย้ายไปที่ "รายการที่ส่ง" เช่นภาพหน้าจอต่อไปนี้ย้ายรายการไปยังโฟลเดอร์หลักโดยอัตโนมัติ

โปรดทราบว่า Outlook มีช่องโหว่

คุณควรระลึกถึงข้อเท็จจริงที่ไม่ต้องสงสัย - Outlook มีความอ่อนไหวต่อข้อผิดพลาดหรือความเสียหาย ดังนั้นคุณต้องระวังภัยคุกคามที่อาจเกิดขึ้นรอบ ๆ ไฟล์ข้อมูล Outlook ของคุณรวมถึงไวรัสการออกที่ไม่เหมาะสมและอื่น ๆ นอกจากนี้คุณควรเตรียมเครื่องมือแก้ไข Outlook ที่มีประสิทธิภาพและน่าเชื่อถือเช่น DataNumen Outlook Repair. สามารถช่วยคุณได้ แก้ไข Outlook ปัญหาภายในไม่กี่นาที

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

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

แบ่งปันเลย:

ความเห็นถูกปิด