Cara Memindahkan E-mel secara automatik dengan kategori warna yang berbeza ke folder yang berbeza di Outlook

Jika anda mahu Outlook memindahkan e-mel secara automatik ke folder yang berbeza apabila anda menetapkan kategori warna yang berbeza kepadanya, anda boleh menggunakan kaedah yang diperkenalkan dalam siaran ini.

Ramai pengguna menginginkan kaedah untuk memindahkan e-mel secara automatik ke folder tertentu apabila kategori warna tertentu diberikan kepadanya. Tanpa keraguan, Outlook tidak menawarkan ciri langsung seperti itu untuk merealisasikannya. Oleh itu, berikut ini, kami akan mengajar anda kaedah untuk mendapatkannya. Sekarang, baca terus untuk mendapatkan langkah terperinci.

Pindahkan E-mel secara automatik dengan kategori warna berbeza ke folder yang berbeza

1. Sebagai permulaan, lancarkan program Outlook anda.
2. Kemudian, di Outlook, tekan butang kekunci "Alt + F11" untuk mengakses editor VBA.
3. Selepas itu, masukkan kod VBA berikut ke dalam projek "ThisOutlookSession".

Private WithEvents objInboxFolder As Outlook.Folder
Private WithEvents objInboxItems As Outlook.Items

'Process inbox mails
Private Sub Application_Startup()
    Set objInboxFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox)
    Set objInboxItems = objInboxFolder.Items
End Sub

'Occurs when changing item
Private Sub objInboxItems_ItemChange(ByVal Item As Object)
    Dim objMail As Outlook.MailItem
    Dim objTargetFolder As Outlook.Folder
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
 
       'Move mails based on color category
       If InStr(objMail.Categories, "Private") > 0 Then
          Set objTargetFolder = Application.Session.GetDefaultFolder(olFolderInbox).Folders("Private")
          objMail.Move objTargetFolder
       ElseIf InStr(objMail.Categories, "Business") > 0 Then
          Set objTargetFolder = Application.Session.GetDefaultFolder(olFolderInbox).Folders("Business")
          objMail.Move objTargetFolder
       End If
    End If
End Sub

Nota:

• Untuk memproses item dalam folder lain, Anda dapat mengubah objek "objInboxFolder", seperti "Application.Session.GetDefaultFolder (olFolderSentMail)" untuk folder "Item Terkirim".
• Juga, ubah kategori warna dan folder sasaran yang telah ditakrifkan dalam kod di atas mengikut kes sebenar anda.
• Selain itu, anda boleh menggunakan "ElseIf" untuk menambahkan kategori warna pilihan lain.

4. Selepas itu, gerakkan kursor dalam subrutin "Application_Startup" dan tekan "F5", yang akan mengaktifkan makro ini.
5. Akhirnya, anda boleh mengambil gambar. Inilah contoh saya.

• Pilih e-mel dalam folder Peti Masuk.
• Kemudian, tetapkan kategori warna "Peribadi" kepadanya.
• Sekali gus, surat ini akan dipindahkan ke folder "Peribadi" di bawah "Peti Masuk".

Tangani Pandangan Anda dengan berhati-hati

Mungkin anda telah menghadapi beberapa masalah dalam Outlook anda. Lebih kerap daripada itu, ia berlaku disebabkan oleh pengendalian anda yang tidak betul. Contohnya, anda selalu menutup Outlook dengan tidak betul, seperti mati secara tiba-tiba. Atau anda tidak menyandarkan data Outlook anda secara berkala. Semua tindakan serupa dapat menjadikan Outlook anda lebih rentan. Seperti yang anda ketahui, setelah fail PST rosak, sangat sukar untuk membaikinya. Secara amnya, alat pembaikan peti masuk tidak akan memberi kesan. Anda tidak mempunyai pilihan selain untuk menolong utiliti luaran teratas, seperti DataNumen Outlook Repair.

Pengenalan Pengarang:

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