Comment mettre automatiquement en évidence des mots-clés spécifiques des e-mails entrants dans Outlook
Dans Outlook, vous pouvez recevoir des centaines et des milliers d'e-mails chaque jour, avez-vous déjà voulu mettre en évidence automatiquement certains mots-clés spécifiques des e-mails entrants? Dans cet article, j'introduis un code VBA pour mettre automatiquement en évidence les mots-clés que vous spécifiez à partir des e-mails entrants dans Outlook.
Mettre en évidence automatiquement les mots-clés des e-mails entrants
Mettre en évidence automatiquement les mots-clés des e-mails entrants
Aucune fonction intégrée dans Outlook ne peut gérer ce travail, à l'exception de VBA.
1. presse Alt + F11 pour activer le Microsoft Visual Basic pour applications fenêtre.
2. Puis double-cliquez Cette session Outlook à gauche Projet et copiez et collez le code ci-dessous dans la nouvelle fenêtre de code.
VBA: mise en évidence automatique des mots-clés dans les e-mails entrants
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
Conseil: dans le code, vous pouvez modifier les mots-clés selon vos besoins dans ce script xWordArr = Tableau("Kutools", "Important") .
3. Enregistrez ensuite le code et revenez à Outlook ， sous Accueil onglet, cliquez sur Règles > Gérer les règles et les alertes.
4. dans le Règles et alertes dialogue, cliquez sur Nouvelle règle sous Règles de messagerie onglet, puis dans Assistant de règles dialogue, cliquez sur Appliquer la règle aux messages que je reçois.
5. Cliquez Suivant > Suivant > Oui pour accéder à la troisième boîte de dialogue, cochez exécuter un script à Step1 section, puis cliquez un script in Step2 section à activer Sélectionnez un script boîte de dialogue, choisissez ce code Project1.ThisOutlookSession.AutoHighlight_SpecificWordsCliquez sur OK.
6. Cliquez Suivant > Suivant, dans la dernière boîte de dialogue, donnez un nom à cette règle.
7. Cliquez Finition > OK pour terminer la règle.
À partir de maintenant, les mots-clés que vous avez spécifiés seront automatiquement mis en évidence dans les e-mails entrants.
Enregistrer ou exporter plusieurs e-mails vers d'autres fichiers fomat (PDF / HTML / WORD / EXCEL) dans Outlook |
| Parfois, vous souhaiterez peut-être enregistrer ou exporter les e-mails dans un dossier sous d'autres formats de fichiers, tels que des fichiers PDF, Word ou Excel dans Outlook. Dans Outlook, aucune des fonctions Enregistrer sous et Exporter ne peut gérer ce travail. cependant, Kutools for Outlook's Save as file L'utilitaire peut exporter plusieurs e-mails vers un dossier sous forme de fichiers avec plusieurs formats à la fois. Cliquez pour un essai gratuit de 45 jours! |
 |
| Kutools for Outlook: avec des dizaines de compléments Outlook pratiques, essayez gratuitement sans limitation en 45 jours. |
Meilleurs outils de productivité bureautique
Dernières nouvelles : lancement de Kutools pour Outlook Version gratuite!
Découvrez le tout nouveau Kutools pour Outlook Version GRATUITE avec plus de 70 fonctionnalités incroyables, à utiliser POUR TOUJOURS! Cliquez pour télécharger maintenant!
📧 Email Automation: Réponse automatique (disponible pour POP et IMAP) / Programmer l'envoi d'e-mails / Auto CC/BCC par règles lors de l'envoi d'un e-mail / Transfert automatique (règles avancées) / Ajouter un message d'accueil automatique / Divisez automatiquement les e-mails multi-destinataires en messages individuels
(I.e. Email Management: Rappel des e-mails / Bloquer les e-mails frauduleux par sujets et autres / Supprimer les e-mails en double / Recherche Avancée / Consolider les dossiers
(I.e. Pièces jointes Pro: Sauvegarde par lots / Détachement par lots / Compression par lots / Enregistrement automatique / Détachement automatique / Compression automatique
???? Magie de l'interface: 😊Plus d'émojis jolis et cool / Vous rappeler lorsque des e-mails importants arrivent / Réduire Outlook au lieu de fermer
???? Merveilles en un clic: Répondre à tous avec les pièces jointes entrantes / E-mails anti-hameçonnage / 🕘Afficher le fuseau horaire de l'expéditeur
👩🏼🤝👩🏻 Contacts et calendrier: Ajouter par lots des contacts à partir des e-mails sélectionnés / Diviser un groupe de contacts en groupes individuels / Supprimer les rappels d'anniversaire
