Secara lalai, temu janji baharu dipaparkan sebagai “Sibuk”. Tetapi, sesetengah pengguna tidak menyukai perkara ini. Kini, catatan ini akan berkongsi 2 cara untuk menukar status lalai temu janji baharu dalam Outlook.
Ramai pengguna tidak menyukai status "Tunjukkan Sebagai" lantikan janji temu Outlook baru - "Sibuk". Namun, Outlook tidak membenarkan pengguna mengubah status ini secara langsung. Oleh itu, jika anda ingin mengubahnya, anda harus mencari kaedah lain. Di sini kami akan mengajar 2 kaedah kepada anda.
Kaedah 1: Terapkan Borang Khusus pada Folder Kalendar
- Pertama sekali, mulakan aplikasi Outlook anda.
- Kemudian akses ke kawasan "Kalendar".
- Seterusnya, klik butang "Temujanji Baru" di pita.
- Selanjutnya, di tetingkap Janji temu, beralih ke tab "Pembangun" dan klik butang "Reka Bentuk Ini".
- Setelah itu, di layar baru, beralih ke tab "(Semua Bidang)".
- Kemudian, pilih "Semua bidang Temujanji" di medan "Pilih dari".
- Kemudian, anda harus menatal ke bawah sehingga mencari bidang "Show Time As", yang mana anda perlu menukar "Sibuk" menjadi "Percuma".
- Setelah itu, anda dapat mengklik butang "Publish" dan memilih "Publish Form As".
- Dalam kotak dialog pop timbul, masukkan nama untuk formulir ini, seperti "Janji Temu Gratis" dan tekan "Terbitkan".
- Kemudian, anda boleh menutup janji temu ini tanpa menyimpan.
- Seterusnya, klik kanan pada kalendar di panel navigasi dan pilih 'Properties' di menu konteks.
- Kemudian, di kotak baru, ubah "IPM.Appointment" menjadi "Free Appointment" seperti tangkapan layar berikut.
- Akhirnya, klik "OK" untuk menyimpan perubahan.
- Sejak itu, semua janji temu baru yang ditambahkan pada kalendar ini akan ditunjukkan sebagai "Percuma" secara lalai.
Kaedah 2: Terapkan secara automatik Status Lain pada Temujanji Baru melalui VBA
- Di tempat pertama, tekan butang kekunci "Alt + F11".
- Kemudian, di tetingkap "Microsoft Visual Basic for Applications", cari dan buka projek "ThisOutlookSession".
- Seterusnya, salin dan tampal kod VBA berikut ke dalam projek ini.
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
- Selepas itu, tandatangani kod ini.
- Akhirnya anda perlu memulakan semula Outlook untuk mengaktifkan makro ini.
- Mulai sekarang, temu janji baru pasti akan ditunjukkan sebagai "Percuma" secara automatik.
Apa yang Perlu Dilakukan Sekiranya Anda Menderita Kerosakan Outlook
Outlook boleh rosak tanpa sebarang amaran. Oleh itu, agak sukar untuk meramalkan dan mencegah kes-kes yang teruk itu. Walau bagaimanapun, anda masih harus membuat langkah-langkah bantuan yang berkesan, termasuk sandaran yang dikemas kini untuk data Outlook dan juga alat pembaikan yang kuat, seperti DataNumen Outlook Repair. Ia akan menyelamatkan anda jika scanpst, alat pembaikan yang dibina tidak dapat memberi kesan.
Pengenalan Pengarang:
Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk rasuah sql dan produk perisian pembaikan prospek. Untuk maklumat lebih lanjut, lawati www.datanumen.com