Kuinka automaattisesti korostaa tiettyjä avainsanoja saapuvista sähköpostiviesteistä Outlookissa
Outlookissa saatat saada satoja ja tuhansia sähköposteja päivittäin. Oletko koskaan halunnut korostaa tiettyjä avainsanoja saapuvista sähköposteista automaattisesti? Tässä artikkelissa esittelen VBA-koodin, joka korostaa automaattisesti määrittämäsi avainsanat Outlookin saapuvista sähköpostiviesteistä.
Korosta avainsanoja automaattisesti saapuvista sähköposteista
Korosta avainsanoja automaattisesti saapuvista sähköposteista
Mikään outlookin sisäänrakennettu toiminto ei voi käsitellä tätä työtä paitsi VBA.
1. Lehdistö Alt + F11 näppäintä ottaaksesi käyttöön Microsoft Visual Basic for Applications ikkunassa.
2. Kaksoisnapsauta sitten ThisOutlookSession vasemmalla projekti ruutuun ja kopioi ja liitä alla oleva koodi uuteen koodiikkunaan.
VBA: Korosta avainsanat automaattisesti saapuvissa sähköpostiviesteissä
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
Vihje: koodissa voit muuttaa avainsanoja tarpeen mukaan tässä skriptissä xWordArr = Array("Kutools", "Tärkeää") .
3. Tallenna sitten koodi ja palaa Outlookiin ETUSIVU välilehti, napsauta Säännöt > Hallitse sääntöjä ja ilmoituksia.
4. Vuonna Säännöt ja hälytykset valintaikkunassa, napsauta Uusi sääntö varten Sähköpostin säännöt välilehti ja sitten sisään Ohjattu sääntötoiminto valintaikkunassa, napsauta Sovella sääntö vastaanottamiisi viesteihin.
5. napsauttaa seuraava > seuraava > Kyllä Siirry kolmanteen valintaikkunaan valitsemalla suorittaa komentosarja alkaen Step1 ja napsauta sitten skripti in Step2 osio ottaaksesi käyttöön Valitse Skripti valintaikkunassa, valitse tämä koodi Project1.ThisOutlookSession.AutoHighlight_SpecificWords. Klikkaus OK.
6. napsauttaa seuraava > seuraava, anna tälle säännölle nimi viimeisessä valintaikkunassa.
7. napsauttaa Suorittaa loppuun > OK säännön loppuun saattamiseksi.
Tästä eteenpäin määrittämäsi avainsanat korostetaan automaattisesti saapuvissa sähköpostiviesteissä.
Tallenna tai vie useita sähköposteja muihin muototiedostoihin (PDF/HTML/WORD/EXCEL) Outlookissa |
| Joskus saatat haluta tallentaa tai viedä sähköpostit kansioon muina tiedostomuotoina, kuten PDF-, Word- tai Excel-tiedostoina Outlookissa. Outlookissa kumpikaan Tallenna nimellä ja Vie -toiminnot eivät voi käsitellä tätä työtä. Kuitenkin, Kutools Outlookille's Save as file apuohjelma voi viedä useita sähköposteja kansioon tiedostoina, joissa on useita muotoja kerralla. Napsauta saadaksesi 45 päivän ilmaisen kokeilun! |
 |
| Kutools for Outlook: kymmenillä kätevillä Outlook-apuohjelmilla, joita voit kokeilla ilmaiseksi ilman rajoituksia 45 päivässä. |
Parhaat toimiston tuottavuustyökalut
Breaking News: Kutools for Outlook julkaisee ilmaisen version!
Koe täysin uusi Kutools for Outlook ILMAINEN versio, jossa on yli 70 uskomatonta ominaisuutta, sinun käytössäsi IKUISESTI! Lataa nyt napsauttamalla!
📧 Sähköpostiautomaatio: Automaattinen vastaus (saatavilla POP:lle ja IMAP:lle) / Ajoita sähköpostien lähettäminen / Automaattinen CC/BCC sääntöjen mukaan lähetettäessä sähköpostia / Automaattinen edelleenlähetys (lisäsäännöt) / Automaattinen tervehdys / Jaa usean vastaanottajan sähköpostit automaattisesti yksittäisiksi viesteiksi ...
📨 Sähköposti Management: Muista sähköpostit / Estä huijaussähköpostit aiheiden ja muiden taholta / Poista päällekkäiset sähköpostit / Tarkennettu Haku / Yhdistä kansiot ...
📁 Liitteet Pro: Erätallennus / Erä Irrota / Eräpakkaus / Automaattinen tallennus / Automaattinen irrotus / Automaattinen pakkaus ...
🌟 Interface Magic: 😊Lisää kauniita ja siistejä emojia / Muistuttaa sinua tärkeistä sähköpostiviesteistä / Minimoi Outlook sulkemisen sijaan ...
???? Yhden napsautuksen Wonders: Vastaa kaikkiin liitteillä / Tietojenkalastelun vastaiset sähköpostit / 🕘Näytä lähettäjän aikavyöhyke ...
👩🏼🤝👩🏻 Yhteystiedot ja kalenteri: Erä Lisää yhteystietoja valituista sähköpostiviesteistä / Jaa yhteysryhmä yksittäisiin ryhmiin / Poista syntymäpäivämuistutukset ...
