Cara Auto Tetapkan Peringatan dan Tarikh Akhir Semasa Menandakan Email Outlook untuk Tindak Lanjut

Outlook membolehkan pengguna menandakan e-mel dengan peringatan susulan khas dan tarikh akhir. Tetapi anda perlu memilih dan mengaktifkannya secara manual. Artikel ini akan mengajar anda bagaimana mencapainya secara automatik melalui VBA.

Outlook memberi kami ciri "Bendera", yang membolehkan kami mengikuti e-mel kritikal dengan lebih mudah. Bukan hanya itu memungkinkan kita membuat e-mel, tetapi juga memungkinkan kita untuk memilih ikon bendera pilihan, menetapkan tarikh akhir tertentu dan bahkan menentukan peringatan khusus untuk e-mel. Tanpa keraguan, ia sangat berguna.

Tetapi ramai pengguna masih mempunyai keinginan lain. Mereka berharap bahawa Outlook dapat secara automatik menentukan tarikh akhir khusus dan masa peringatan untuk e-mel yang ditandai, seperti 3 hari selepas hari ini, 1 minggu selepas hari ini, dan lain-lain. Sejujurnya, Outlook tidak mempunyai ciri asli tersebut. Oleh itu, anda perlu berulang dengan cara lain, misalnya, VBA. Di sini kami akan mengajar anda bagaimana menggunakan Outlook VBA untuk memenuhi keperluan ini. Teruskan membaca untuk mendapatkannya secara terperinci.

Auto Tetapkan Peringatan dan Tarikh Akhir Semasa Membentangkan E-mel Outlook

1. Pada awalnya, lancarkan program Outlook anda.
2. Kemudian anda boleh menekan pintasan kekunci "Alt + F11" untuk mendapatkan akses ke editor VBA.
3. Selanjutnya di tetingkap "Microsoft Visual Basic for Applications" berikut, anda perlu mengklik dua kali pada projek "ThisOutlookSession" di sebelah kiri.
4. Selepas itu, salin dan tampal kod VBA di bawahnya.

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. Selepas itu, anda harus menandatangani kod ini seperti biasa.
6. Keluar dari editor VBA dan terus menukar tetapan makro Outlook anda untuk mengaktifkan makro yang ditandatangani secara digital sahaja.
7. Akhir sekali, anda perlu memulakan semula Outlook anda untuk mengaktifkan makro baharu. Selepas itu, anda boleh mencubanya.

• Klik ikon bendera di bahagian belakang item e-mel.
• Sekali gus, bendera akan diubah secara otomatis menjadi ikon "Minggu Depan".
• Dan tarikh akhir dan masa peringatan akan ditetapkan sesuai dengan pra-tetapan anda dalam kod.

Jangan Panik Jika Menemui Kerosakan Outlook

Apabila Outlook ranap secara tidak dijangka, kebanyakan orang akan takut panik kerana mereka takut data Outlook mereka akan rosak. Tetapi sebenarnya jika anda telah mengambil langkah berjaga-jaga yang mencukupi, anda tidak akan pernah panik. Langkah yang paling penting adalah membuat sandaran fail PST secara berkala. Selain itu, anda juga boleh menggunakan alat unggul untuk mendapatkan kembali data anda. Outlook yang rosak data, seperti DataNumen Outlook Repair.

Pengenalan Pengarang:

Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk memperbaiki sql dan produk perisian pembaikan prospek. Untuk maklumat lebih lanjut, lawati www.datanumen.com