Outlook'ta gelen e-postalardan belirli anahtar kelimeleri otomatik olarak nasıl vurgulayabilirsiniz?

Outlook'ta, her gün yüzlerce ve binlerce e-posta alabilir, hiç bir zaman gelen e-postalardaki belirli anahtar kelimeleri otomatik olarak vurgulamak istediniz mi? Bu makalede, Outlook'ta gelen e-postalardan belirttiğiniz anahtar kelimeleri otomatik olarak vurgulamak için bir VBA kodu ekliyorum.

Gelen e-postalardaki anahtar kelimeleri otomatik olarak vurgula

Gelen e-postalardaki anahtar kelimeleri otomatik olarak vurgula

Görünümde yerleşik bir işlev, VBA hariç bu işi halledemez.

1. Basın Alt + F11 tuşunu etkinleştirmek için Uygulamalar için Microsoft Visual Basic pencere.

2. Sonra çift tıklayın ThisOutlookSession solda proje bölmesini kopyalayın ve kodun altında kopyalayıp yeni kod penceresine yapıştırın.

VBA: Gelen e-postalardaki anahtar kelimeleri otomatik vurgula

Public WithEvents GMailItems Olarak Outlook.Items 'UpdatebyExtendoffice20181106 Özel Alt Application_Startup () Set GMailItems = Outlook.Application.Session.GetDefaultFolder (olFolderInbox) .Items End Sub Özel Alt GMailItems_ItemAdd (ByVal Öğe Nesne Olarak Nesne) Item.Class <> olMail Sonra Exit Sub AutoHighlight_SpecificWords Öğe Son Alt Alt AutoHighlight_SpecificWords (Outlook.MailItem Olarak Posta) Dim xWord Varyant Dim Olarak xHTMLBody Dize Olarak, xStr As String Dize xWordArr On Hata Özgeçmiş Sonraki xWordArr = Array ("Kutools", "Önemli") 'anahtar kelime xHTMLBody = Mail.HTMLBody Her xWord için xWordArr için InStr (xHTMLBody, xWord)> 0 Sonra xStr = "<font style =" & Chr (34) & "arka plan rengi: sarı" & Chr (34) & ">" & xWord & "< / font> "xHTMLBody = Değiştir (xHTMLBody, xWord, xStr) Mail.HTMLBody = Bir Sonraki Mail.Save End Sub Altında xHTMLBody End

Bahşiş: Kodda, bu komut dosyasında istediğiniz gibi anahtar kelimeleri değiştirebilirsiniz xWordArr = Array ("Kutools""Önemli") .

3. Ardından kodu kaydedin ve Outlook'a geri dönün ， Anasayfa sekmesini tıklayın kurallar > Kuralları ve Uyarıları Yönet.

4. içinde Kurallar ve Uyarılar iletişim, tıklayın Yeni kural altında E-posta Kuralları sekme, sonra Kural Savcısı iletişim, tıklayın Alınan iletilere kural uygula.

5. tık Sonraki > Sonraki > Evet üçüncü diyaloğa gitmek için senaryoyu çalıştır itibaren Step1 bölümüne gelin ve ardından tıklayın Bir komut dosyası in Step2 etkinleştirilecek bölüm Komut Dosyası Seç iletişim kutusu, bu kodu seçin Project1.ThisOutlookSession.AutoHighlight_SpecificWords. tıklayın OK.

6. tık Sonraki > SonrakiSon iletişim kutusunda, bu kural için bir ad verin.

7. tık Bitiş > OK kuralı bitirmek için

Bundan sonra, belirttiğiniz anahtar kelimeler gelen e-postalarda otomatik olarak vurgulanacaktır.

Outlook'ta diğer fomat dosyalarına (PDF / HTML / WORD / EXCEL) birden fazla e-posta kaydetme veya verme

Bazen, e-postaları Outlook'ta PDF, Word veya Excel dosyaları gibi diğer biçim dosyaları gibi bir klasöre kaydetmek veya dışa aktarmak isteyebilirsiniz. Outlook'ta, Farklı Kaydet ve Dışa Aktarma işlevi bu işi halledemez. Ancak, Kutools for Outlook's Save as file programı bir kerede çoklu formatlı dosyalar olarak bir klasöre birden fazla e-postalar verebilir. 45 gün ücretsiz deneme için tıklayınız!

Outlook için Kutools: düzinelerce kullanışlı Outlook eklentileri ile, 45 günlerinde herhangi bir sınırlama olmaksızın ücretsiz olarak çalışın.

Kutools for Outlook

Outlook için 100'ten Fazla Gelişmiş İşlevler 2010, 2013, 2016, 2019 ve 365

Diğer Özellikler | Bedava indir | Yüzlerce işlev için yalnızca $ 39.00