Cómo resaltar automáticamente palabras clave específicas de los correos electrónicos entrantes en Outlook
En Outlook, puede recibir cientos y miles de correos electrónicos todos los días. ¿Alguna vez ha querido resaltar automáticamente algunas palabras clave específicas de los correos electrónicos entrantes? En este artículo, presento un código VBA para resaltar automáticamente las palabras clave que especifica de los correos electrónicos entrantes en Outlook.
Resaltar automáticamente las palabras clave de los correos electrónicos entrantes
Resaltar automáticamente las palabras clave de los correos electrónicos entrantes
Ninguna función incorporada en Outlook puede manejar este trabajo, excepto VBA.
1. Prensa Alt + F11 clave para habilitar el Microsoft Visual Basic para aplicaciones ventana.
2. Luego haga doble clic Esta sesión de Outlook a la izquierda Proyecto panel, y copie y pegue el código siguiente en la nueva ventana de código.
VBA: resalte automáticamente las palabras clave en los correos electrónicos entrantes
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
Consejo: en el código, puede cambiar las palabras clave que necesite en este script xWordArr = Matriz ("Kutools""Importante:") .
3. Luego guarde el código y regrese a Outlook, en Inicio pestaña, clic Reglas > Administrar reglas y alertas.
4. En el Reglas y Alertas diálogo, haga clic Nueva regla bajo Reglas de correo electrónico pestaña, luego en Asistente de reglas diálogo, haga clic Aplicar regla sobre los mensajes que recibo.
5. Hacer clic en Siguiente > Siguiente > Sí para ir al tercer diálogo, marque ejecutar un script en Step1 sección, luego haga clic un guión in Step2 sección para habilitar Seleccionar guion cuadro de diálogo, elija este código Proyecto1.Esta sesión de Outlook.AutoHighlight_SpecificWords. Hacer clic OK.
6. Hacer clic en Siguiente > Siguiente, en el último cuadro de diálogo, asigne un nombre a esta regla.
7. Hacer clic en Acabado > OK para terminar la regla.
A partir de ahora, las palabras clave que especificó se resaltarán automáticamente en los correos electrónicos entrantes.
Guarde o exporte varios correos electrónicos a otros archivos fomat (PDF / HTML / WORD / EXCEL) en Outlook
|
A veces, es posible que desee guardar o exportar los correos electrónicos a una carpeta como archivos de otro formato, como archivos PDF, Word o Excel en Outlook. En Outlook, ninguna de las funciones Guardar como y Exportar puede manejar este trabajo. Sin embargo, Kutools para Outlook's Save as file La utilidad puede exportar varios correos electrónicos a una carpeta como archivos con varios formatos a la vez. ¡Haga clic para obtener una prueba gratuita de 45 días! |
Kutools para Outlook: con docenas de prácticos complementos de Outlook, prueba gratis sin limitación en 45 días. |
Las mejores herramientas de productividad de oficina
Kutools para Outlook - Más de 100 potentes funciones para potenciar tu perspectiva
🤖 Asistente de correo AI: Correos electrónicos profesionales instantáneos con magia de IA: respuestas geniales con un clic, tono perfecto y dominio multilingüe. ¡Transforme el correo electrónico sin esfuerzo! ...
📧 Automatización de correo electrónico: Fuera de la oficina (disponible para POP e IMAP) / Programar envío de correos electrónicos / CC/CCO automático según reglas al enviar correo electrónico / Reenvío automático (reglas avanzadas) / Agregar saludo automáticamente / Divida automáticamente correos electrónicos de múltiples destinatarios en mensajes individuales ...
📨 Gestión de correo electrónico: Recuperar correos electrónicos fácilmente / Bloquear correos electrónicos fraudulentos por sujetos y otras personas / Eliminar correos electrónicos duplicados / Búsqueda Avanzada / Consolidar carpetas ...
📁 Archivos adjuntos profesionales: Guardar lote / Separación de lotes / Comprimir por lotes / Ahorro automático / Desconexión automática / Autocompresión ...
???? Interfaz mágica: 😊Más emojis bonitos y geniales / Aumente su productividad en Outlook con vistas con pestañas / Minimizar Outlook en lugar de cerrar ...
👍 Maravillas con un clic: Responder a todos los archivos adjuntos entrantes / Correos electrónicos antiphishing / 🕘Mostrar zona horaria del remitente ...
👩🏼🤝👩🏻 Contactos y calendario: Agregar por lotes contactos de correos electrónicos seleccionados / Dividir un grupo de contactos en grupos individuales / Eliminar recordatorios de cumpleaños ...
Mas de Características 100 ¡Espere su exploración! Haga clic aquí para descubrir más.