วิธีกำหนดหมวดหมู่สีให้กับการนัดหมายใหม่โดยอัตโนมัติผ่าน Outlook VBA

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

ผู้ใช้จำนวนมากต้องการจัดการการนัดหมาย Outlook ตาม "หมวดหมู่สี" พวกเขาจึงหวังว่า Outlook จะสามารถจัดหมวดหมู่การนัดหมายใหม่ได้โดยอัตโนมัติ บทความนี้จะแนะนำวิธีการทำความเข้าใจเรื่องนี้

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

กำหนดหมวดหมู่สีให้กับการนัดหมายใหม่โดยอัตโนมัติ

ในตอนแรก สลับไปที่แท็บ "นักพัฒนา" แล้วคลิกปุ่ม "Visual Basic"
ในหน้าต่างใหม่ ให้เปิดโครงการ “ThisOutlookSession” โดยดับเบิลคลิก
จากนั้นในกล่องโต้ตอบ "ThisOutlookSession" คุณควรคัดลอกและวางโค้ด VBA ต่อไปนี้:

Public WithEvents olItems As Outlook.Items

Sub Application_Startup()
    Set olItems = Session.GetDefaultFolder(olFolderCalendar).Items
End Sub

Private Sub olItems_ItemAdd(ByVal Item As Object)
    Dim NewAppt As Outlook.AppointmentItem
 
    If Item.Class = olAppointment Then
       Set NewAppt = Item
    'Specify a color category based on appointment subject
    'You can replace "Test" with your desired string in subject line
       If InStr(Item.Subject, "Test") > 0 Then
          If Item.Categories = "" Then
             Item.Categories = "Test Category"
             Item.Save
          End If
       End If
    End If

    Set NewAppt = Nothing
End Sub

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

ระวังมาโครที่เป็นอันตรายใน Outlook

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

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

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