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

โซลูชัน Outlook September 29, 2025
แบ่งปันเลย:

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

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

ย้ายอีเมลไปยังโฟลเดอร์เฉพาะโดยอัตโนมัติหลังจากที่คุณส่งต่อ

  1. ในตอนแรกเปิด Outlook
  2. จากนั้นเปลี่ยนไปที่แท็บ "นักพัฒนา"

หมายเหตุ: หากคุณไม่พบแท็บนี้คุณควรไปที่“ File”>“ Options”>“ Customize Ribbon” เพื่อเปิดใช้งานในขั้นแรก

  1. หลังจากมองเห็นแท็บนี้แล้วคุณสามารถค้นหาและคลิกปุ่ม "Visual Basic" ที่อยู่ด้านล่าง
  2. จากนั้นหน้าต่าง“ Microsoft Visual Basic for Applications” ใหม่จะปรากฏขึ้น ในนั้นคุณควรคลิกสองครั้งที่โปรเจ็กต์“ ThisOutlookSession” ทางด้านซ้ายเพื่อเปิด
  3. หลังจากนั้นคุณสามารถคัดลอกและวางรหัส VBA ต่อไปนี้ลงไปได้
Public WithEvents objExplorer As Outlook.Explorer
Public WithEvents objMail As Outlook.MailItem

Private Sub Application_Startup()
    Set objExplorer = Outlook.Application.ActiveExplorer
End Sub

Private Sub objExplorer_SelectionChange()
    On Error Resume Next
    Set objMail = objExplorer.Selection.Item(1)
End Sub

Private Sub objMail_Forward(ByVal Response As Object, Cancel As Boolean)
    Dim objInboxFolder As Folder
    Dim objTargetFolder As Folder
 
    Set objInboxFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox)
 
    On Error Resume Next
    Set objTargetFolder = objInboxFolder.parent.Folders("Forwarded")
    If objTargetFolder Is Nothing Then
       Set objTargetFolder = objInboxFolder.parent.Folders.Add("Forwarded")
    End If
    objMail.Categories = "Forwarded"
    objMail.Move objTargetFolder
End Sub

รหัส VBA - ย้ายอีเมลไปยังโฟลเดอร์เฉพาะโดยอัตโนมัติหลังจากที่คุณส่งต่อ

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

หลีกเลี่ยงความเสียหายของข้อมูล Outlook PST ที่ไม่ต้องการ

หนึ่งในนั้นost ปัญหาที่รบกวนผู้ใช้ Outlook มาเป็นเวลานานคือ Outlook มีแนวโน้มที่จะเกิดความเสียหาย กล่าวคือทุกข์ PST ความเสียหาย เป็นเรื่องธรรมดา ดังนั้นเพื่อป้องกันการสูญเสียข้อมูล Outlook คุณควรทำการสำรองข้อมูล PST ที่สม่ำเสมอและเป็นปัจจุบันให้ดียิ่งขึ้น

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

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

แบ่งปันเลย:

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