Alcuni utenti di Outlook preferiscono classificare le proprie e-mail in base alle categorie di colori dei contatti dei mittenti. L'assegnazione manuale della categoria deve essere complicata. Questo articolo introdurrà come realizzarlo automaticamente con Outlook VBA.
Per migliorare l'efficienza del tuo lavoro in Outlook, ti impegnerai a gestire meglio le tue e-mail. Senza dubbio, "Categorie di colore" è una buona caratteristica in questo senso. Molti utenti preferiscono utilizzarlo per organizzare e distinguere le proprie e-mail. Naturalmente, la base concreta della classificazione dei colori delle e-mail dipende dalle tue abitudini personali. Ad esempio, alcuni utenti hanno classificato i propri contatti in base al colore, pertanto sperano di classificare le proprie e-mail in base alle categorie di contatti dei mittenti. Se lo fai manualmente, sarà decisamente complicato in quanto devi prima controllare le categorie di contatto del mittente e poi assegnarlo manualmente all'e-mail.
Per soddisfare questo requisito, in realtà puoi utilizzare Outlook VBA, che può consentire a Outlook di controllare automaticamente le categorie di contatti del mittente e assegnarlo alle nuove e-mail. Se sei interessato a questa funzione, continua a leggere per ottenere i passaggi e i codici elaborati.
Categorizza automaticamente le e-mail in arrivo in base alle categorie di contatti dei mittenti
- In primo luogo, avvia Outlook e premi i tasti "Alt + F11".
- Quindi verrà visualizzata la finestra dell'editor VBA, in cui è necessario trovare e aprire il progetto "ThisOutlookSession".
- Quindi copia e incolla i seguenti codici VBA in "ThisOutlookSession".
Public WithEvents olItems As Outlook.Items
Private Sub Application_Startup()
Set olItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub olItems_ItemAdd(ByVal Item As Object)
Dim oMail As MailItem
Dim olContacts As Outlook.Items
Dim obj As Object
Dim objVariant As Variant
Dim olCategory As String
Set olContacts = Outlook.Application.Session.GetDefaultFolder(olFolderContacts).Items
If TypeOf Item Is MailItem Then
Set oMail = Item
For Each obj In olContacts
If TypeOf obj Is ContactItem Then
Set objVariant = obj
If objVariant.Email1Address = oMail.SenderEmailAddress Then
olCategory = objVariant.Categories
oMail.Categories = olCategory
End If
End If
Next
End If
End Sub
- Successivamente, è necessario assegnare un certificato digitale alla nuova macro.
- Innanzitutto, crea un nuovo certificato tramite Certificati digitali per progetti VBA.
- Quindi firma digitalmente questo codice.
- Successivamente, puoi modificare la sicurezza delle macro di Outlook, consentendo solo le macro firmate digitalmente.
- Finalmente puoi ristart Outlook per attivare la nuova macro. D'ora in poi, tutte le e-mail in arrivo che arrivano nella cartella Posta in arrivo verranno classificate automaticamente in base alle categorie di contatti dei mittenti.
Risolvi il crash imprevisto di Outlook
Sebbene Outlook sia preferito da molti utenti, non riesce ancora a sbarazzarsi del crash. Devi provare panico quando subisci un arresto imprevisto di Outlook. Non preoccuparti. Puoi intraprendere azioni per diagnosticare e risolvere i problemi da solo, ad esempio restarting Outlook, disabilitazione di componenti aggiuntivi di terze parti, creazione di un nuovo profilo di posta e riparazione della suite Office e così via. Il caso peggiore deve essere dati PST di Outlook corrotti, che è estremamente nodoso. In questo scenario, è necessario ricorrere a un robusto strumento esterno, come DataNumen Outlook Repair.
Introduzione dell'autore:
Shirley Zhang è un'esperta di recupero dati in DataNumen, Inc., che è il leader mondiale nelle tecnologie di recupero dati, tra cui riparare il db SQL mdf corrotto e prodotti software di riparazione di Outlook. Per maggiori informazioni visita www.datanumen.com