Cara Mengatur Pengingat dan Tanggal Jatuh Tempo Secara Otomatis Saat Menandai Email Outlook untuk Tindak Lanjut

Outlook memungkinkan pengguna untuk menandai email dengan pengingat tindak lanjut khusus dan tanggal jatuh tempo. Tetapi Anda harus memilih dan mengaktifkannya secara manual. Artikel ini akan mengajari Anda cara mencapainya secara otomatis melalui VBA.

Outlook memberi kami fitur "Tandai", yang memungkinkan kami menindaklanjuti email penting dengan lebih mudah. Tidak hanya memungkinkan kita untuk membuat email, tetapi juga memungkinkan kita untuk memilih ikon bendera pilihan, menetapkan tanggal jatuh tempo tertentu dan bahkan menentukan pengingat khusus untuk email. Tanpa ragu, ini sangat berguna.

Namun banyak pengguna masih memiliki keinginan lain. Mereka berharap Outlook dapat secara otomatis menentukan tanggal jatuh tempo dan waktu pengingat kustom yang relatif tetap untuk email yang ditandai, seperti 3 hari setelah hari ini, 1 minggu setelah hari ini, dll. Sejujurnya, Outlook tidak memiliki fitur asli seperti itu. Oleh karena itu, Anda perlu mengulang ke cara lain, misalnya, VBA. Di sini kami akan mengajari Anda cara menggunakan Outlook VBA untuk mewujudkan persyaratan ini. Baca terus untuk mendapatkannya secara detail.

Setel Otomatis Pengingat dan Tanggal Jatuh Tempo Saat Menandai Email Outlook

1. Pertama-tama, luncurkan program Outlook Anda.
2. Kemudian Anda dapat menekan pintasan tombol "Alt + F11" untuk mendapatkan akses ke editor VBA.
3. Selanjutnya di jendela "Microsoft Visual Basic for Applications" berikut, Anda perlu mengklik dua kali proyek "ThisOutlookSession" di sisi kiri.
4. Selanjutnya, salin dan tempel kode VBA di bawah ini ke dalamnya.

Public WithEvents objInboxItems As Outlook.Items

Private Sub Application_Startup()
    Set objInboxItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub

Private Sub objInboxItems_ItemChange(ByVal Item As Object)
    Dim objMail As Outlook.MailItem
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
       If (objMail.IsMarkedAsTask = True) And (objMail.FlagStatus <> olFlagComplete) Then
          'You can change the following lines as per your actual needs
          With objMail
               .FlagRequest = "Type the custom follow-up notes here"
               .MarkAsTask olMarkNextWeek
               'Set a custom due date
               .TaskDueDate = Now + 7
               .ReminderSet = True
               'Set a custom reminder time
               .ReminderTime = Now + 6.5
               .Save
         End With
       End If
    End If
End Sub

5. Setelah itu, Anda harus menandatangani kode ini seperti biasa.
6. Kemudian keluar dari editor VBA dan lanjutkan untuk mengubah pengaturan makro Outlook Anda untuk mengaktifkan makro yang ditandatangani secara digital saja.
7. Terakhir, Anda perlu memulai ulang Outlook Anda untuk mengaktifkan makro baru. Setelah itu, Anda dapat mencobanya.

• Klik ikon bendera di bagian ekor item email.
• Sekaligus, bendera tersebut akan otomatis berubah menjadi ikon “Bendera Minggu Depan”.
• Dan tanggal jatuh tempo dan waktu pengingatnya akan diatur sesuai dengan pra-pengaturan Anda dalam kode.

Jangan Panik Jika Mengalami Outlook Crash

Ketika Outlook tiba-tiba mengalami kerusakan, kebanyakan orang akan panik karena takut data Outlook mereka akan rusak. Namun sebenarnya, jika Anda telah mengambil tindakan pencegahan yang memadai, Anda tidak akan pernah panik. Langkah terpenting adalah mencadangkan file PST secara teratur. Selain itu, Anda juga dapat menggunakan alat yang unggul untuk memulihkan data Anda. Outlook rusak data, seperti DataNumen Outlook Repair.

Pengantar Penulis:

Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk memperbaiki sql dan produk perangkat lunak perbaikan pandangan. Untuk informasi lebih lanjut kunjungi www.datanumen.com