Come evidenziare automaticamente parole chiave specifiche dalle e-mail in arrivo in Outlook

In Outlook, potresti ricevere centinaia e migliaia di e-mail ogni giorno, hai mai desiderato evidenziare automaticamente alcune parole chiave specifiche dalle e-mail in arrivo? In questo articolo, introduco un codice VBA per evidenziare automaticamente le parole chiave specificate dalle e-mail in arrivo in Outlook.

Evidenzia automaticamente le parole chiave dalle email in arrivo

Evidenzia automaticamente le parole chiave dalle email in arrivo

Nessuna funzione integrata in Outlook può gestire questo lavoro tranne VBA.

1. Stampa Alt + F11 tasto per abilitare il Microsoft Visual Basic, Applications Edition finestra.

2. Quindi fare doppio clic Questa sessione di Outlook a sinistra Progetto riquadro e copia e incolla il codice sottostante nella nuova finestra del codice.

VBA: evidenzia automaticamente le parole chiave nelle e-mail in arrivo

Public WithEvents GMailItems As Outlook.Items
'UpdatebyExtendoffice20181106
Private Sub Application_Startup()
    Set GMailItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub GMailItems_ItemAdd(ByVal Item As Object)
    If Item.Class <> olMail Then Exit Sub
    AutoHighlight_SpecificWords Item
End Sub
Sub AutoHighlight_SpecificWords(Mail As Outlook.MailItem)
    Dim xWord As Variant
    Dim xHTMLBody As String, xStr As String
    Dim xWordArr
    On Error Resume Next
    xWordArr = Array("Kutools", "Important")  'keyword
    xHTMLBody = Mail.HTMLBody
    For Each xWord In xWordArr
        If InStr(xHTMLBody, xWord) > 0 Then
            xStr = "<font style=" & Chr(34) & "background-color: yellow" & Chr(34) & ">" & xWord & "</font>"
            xHTMLBody = Replace(xHTMLBody, xWord, xStr)
            Mail.HTMLBody = xHTMLBody
        End If
    Next
    Mail.Save
End Sub

Mancia: nel codice, puoi modificare le parole chiave di cui hai bisogno in questo script xWordArr = Array ("Kutools""Consigli ") .

3. Quindi salva il codice e torna ad Outlook ， sotto Casa scheda, fare clic Regole > Gestisci regole e avvisi.

4. Nel Regole e avvisi finestra di dialogo, fare clic Nuova regola per Regole di posta elettronica scheda, quindi in Creazione guidata regole finestra di dialogo, fare clic Applica la regola sui messaggi che ricevo.

5. Clic Prossimo > Prossimo > Sì per andare alla terza finestra di dialogo, seleziona eseguire uno script da Step1 sezione, quindi fare clic un copione in Step2 sezione per abilitare Seleziona Script finestra di dialogo, scegli questo codice Project1.ThisOutlookSession.AutoHighlight_SpecificWords. Clic OK.

6. Clic Prossimo > Prossimo, nell'ultima finestra di dialogo, dai un nome a questa regola.

7. Clic Fine > OK per finire la regola.

D'ora in poi, le parole chiave specificate verranno evidenziate automaticamente nelle e-mail in arrivo.

Salva o esporta più email in altri file fomat (PDF / HTML / WORD / EXCEL) in Outlook

A volte, potresti voler salvare o esportare le e-mail in una cartella come altri file di formato, come file PDF, Word o Excel in Outlook. In Outlook, nessuna delle funzioni Salva con nome ed Esporta può gestire questo lavoro. Però, Kutools per Outlook's Save as file l'utility può esportare più email in una cartella come file con più formati contemporaneamente. Fai clic per una prova gratuita di 45 giorni!

Kutools for Outlook: con dozzine di utili componenti aggiuntivi di Outlook, liberi di provare senza limitazioni in 45 giorni.

Kutools for Outlook: porta 100 funzionalità avanzate in Outlook e semplifica notevolmente il lavoro!

Auto CC / BCC dalle regole durante l'invio di e-mail; Avanzamento automatico Email multiple personalizzate; Risposta automatica senza server di scambio e più funzioni automatiche ...
Avviso BCC - mostra il messaggio quando provi a rispondere a tutti se il tuo indirizzo e-mail è nell'elenco BCC; Ricorda quando mancano allegatie altre funzioni di promemoria ...
Rispondi (tutti) con tutti gli allegati nella conversazione di posta; Rispondi a molte email in secondi; Aggiunta automatica di saluto quando rispondi; Aggiungi la data all'oggetto ...
Strumenti per gli allegati: gestisci tutti gli allegati in tutti i messaggi, Scollegamento automatico, Comprimi tutto, Rinomina tutto, Salva tutto ... Rapporto rapido, Conta le email selezionate...
E-mail spazzatura potenti per abitudine; Rimuovi messaggi e contatti duplicati... Consentono di fare in modo più intelligente, veloce e migliore in Outlook.