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

ย้ายอีเมลอัตโนมัติที่มีประเภทสีต่างกันไปยังโฟลเดอร์ต่างๆ
- ขั้นแรก ให้เปิดโปรแกรม Outlook ของคุณ
- จากนั้นใน Outlook ให้กดปุ่ม "Alt + F11" เพื่อเข้าถึงตัวแก้ไข VBA
- จากนั้นใส่รหัส VBA ต่อไปนี้ในโครงการ“ ThisOutlookSession”
Private WithEvents objInboxFolder As Outlook.Folder
Private WithEvents objInboxItems As Outlook.Items
'Process inbox mails
Private Sub Application_Startup()
Set objInboxFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox)
Set objInboxItems = objInboxFolder.Items
End Sub
'Occurs when changing item
Private Sub objInboxItems_ItemChange(ByVal Item As Object)
Dim objMail As Outlook.MailItem
Dim objTargetFolder As Outlook.Folder
If TypeOf Item Is MailItem Then
Set objMail = Item
'Move mails based on color category
If InStr(objMail.Categories, "Private") > 0 Then
Set objTargetFolder = Application.Session.GetDefaultFolder(olFolderInbox).Folders("Private")
objMail.Move objTargetFolder
ElseIf InStr(objMail.Categories, "Business") > 0 Then
Set objTargetFolder = Application.Session.GetDefaultFolder(olFolderInbox).Folders("Business")
objMail.Move objTargetFolder
End If
End If
End Sub
หมายเหตุ:
- หากต้องการประมวลผลรายการในโฟลเดอร์อื่น คุณสามารถเปลี่ยนอ็อบเจกต์ “objInboxFolder” เช่น “Application.Session.GetDefaultFolder(olFolderSentMail)” สำหรับโฟลเดอร์ “รายการที่ส่ง”
- นอกจากนี้ ให้เปลี่ยนหมวดหมู่สีและโฟลเดอร์เป้าหมายที่กำหนดไว้ล่วงหน้าในโค้ดด้านบนให้ตรงกับกรณีการใช้งานจริงของคุณด้วย
- นอกจากนี้ คุณสามารถใช้ “ElseIf” เพื่อเพิ่มหมวดหมู่สีอื่นๆ
- หลังจากนั้น เลื่อนเคอร์เซอร์ไปที่ซับรูทีน “Application_Startup” แล้วกด “F5” เพื่อเปิดใช้งานมาโครนี้
- ในที่สุดคุณก็สามารถยิงได้ นี่คือตัวอย่างของฉัน
- เลือกอีเมลในโฟลเดอร์ Inbox
- จากนั้นกำหนดหมวดหมู่สี "ส่วนตัว" ให้กับมัน
- ทันที จดหมายนี้จะถูกย้ายไปยังโฟลเดอร์ "ส่วนตัว" ภายใต้ "กล่องจดหมาย"
จัดการ Outlook ของคุณด้วยความระมัดระวัง
บางทีคุณอาจพบปัญหาหลายอย่างใน Outlook ของคุณ บ่อยครั้งที่เกิดขึ้นจากการจัดการที่ไม่เหมาะสมของคุณ ตัวอย่างเช่น คุณปิด Outlook อย่างไม่ถูกต้องอยู่เสมอ เช่น ปิดเครื่องกะทันหัน หรือคุณไม่ได้สำรองข้อมูล Outlook เป็นระยะๆ การกระทำที่คล้ายกันทั้งหมดอาจทำให้ Outlook ของคุณมีความเสี่ยงมากขึ้น อย่างที่คุณทราบ เมื่อไฟล์ PST เสียหาย การซ่อมแซมจะเป็นเรื่องยากมาก โดยทั่วไปแล้ว เครื่องมือซ่อมแซมกล่องจดหมาย จะไม่สร้างผลกระทบ คุณไม่มีทางเลือกอื่นนอกจากขอความช่วยเหลือจากยูทิลิตี้ชั้นนำภายนอก เช่น DataNumen Outlook Repair.
บทนำผู้เขียน:
Shirley Zhang เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ กู้คืน sql และผลิตภัณฑ์ซอฟต์แวร์ซ่อมแซมแนวโน้ม ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.


