2 วิธีการเปลี่ยนสถานะเริ่มต้นของการนัดหมายใหม่ใน Outlook

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

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

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

วิธีที่ 1: ใช้แบบฟอร์มที่กำหนดเองกับโฟลเดอร์ปฏิทิน

ขั้นแรก ให้เปิดโปรแกรม Outlook ขึ้นมา
จากนั้นเข้าถึงพื้นที่ "ปฏิทิน"
จากนั้นคลิกปุ่ม "นัดหมายใหม่" ในริบบิ้น
จากนั้นในหน้าต่างการนัดหมาย ให้เปลี่ยนไปที่แท็บ "นักพัฒนา" แล้วคลิกปุ่ม "ออกแบบแบบฟอร์มนี้"
หลังจากนั้น ในหน้าจอใหม่ ให้เปลี่ยนไปที่แท็บ “(ทุกฟิลด์)”
จากนั้น เลือก “ช่องการนัดหมายทั้งหมด” ในช่อง “เลือกจาก”
ต่อมา ให้เลื่อนลงมาจนเจอช่อง "แสดงเวลาเป็น" ซึ่งคุณต้องเปลี่ยน "ไม่ว่าง" เป็น "ว่าง"
หลังจากนั้น คุณสามารถคลิกปุ่ม “เผยแพร่” และเลือก “เผยแพร่แบบฟอร์มเป็น”
ในกล่องโต้ตอบป๊อปอัป ให้ป้อนชื่อสำหรับแบบฟอร์มนี้ เช่น "นัดหมายฟรี" แล้วกด "เผยแพร่"
จากนั้น คุณสามารถปิดการนัดหมายนี้โดยไม่บันทึก
จากนั้น คลิกขวาที่ปฏิทินในบานหน้าต่างนำทาง แล้วเลือก 'คุณสมบัติ' ในเมนูบริบท
จากนั้นในช่องใหม่ ให้เปลี่ยน “IPM.Appointment” เป็น “Free Appointment” ดังภาพหน้าจอต่อไปนี้
ท้ายที่สุด ให้คลิก “ตกลง” เพื่อบันทึกการเปลี่ยนแปลง
ตั้งแต่นั้นมา การนัดหมายใหม่ทั้งหมดที่เพิ่มลงในปฏิทินนี้จะแสดงเป็น "ฟรี" ตามค่าเริ่มต้น

วิธีที่ 2: ใช้สถานะอื่นโดยอัตโนมัติกับการนัดหมายใหม่ผ่าน VBA

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

Private WithEvents objInspectors As Inspectors
Private WithEvents objAppointment As AppointmentItem

Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If Inspector.CurrentItem.Class = olAppointment Then
       Set objAppointment = Inspector.CurrentItem
    End If
End Sub

Private Sub objAppointment_Open(Cancel As Boolean)
    'Get the brand new appointment
    If Len(objAppointment.Subject) = 0 And Len(objAppointment.Location) = 0 Then
       'change busy status to free
       objAppointment.BusyStatus = olFree
    End If
End Sub

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

จะทำอย่างไรถ้าคุณประสบปัญหา Outlook ล่ม

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

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

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