¿Cómo responder automáticamente con el mensaje de correo electrónico original en Outlook?
Normalmente, cuando creamos una regla para confiar automáticamente el correo electrónico fuera de la oficina, no se incluirá el mensaje original en el cuerpo. ¿Cómo podría confiar automáticamente en los correos electrónicos con el mensaje original en Outlook? En este artículo, hablaré sobre un código VBA para ayudarlo a terminar este trabajo lo más rápido posible en Outlook.
Correo electrónico de respuesta automática con mensaje original en Outlook con código VBA
Correo electrónico de respuesta automática con mensaje original en Outlook con código VBA
La regla normal de Outlook no puede ayudarlo a lidiar con el trabajo, pero, con el siguiente código VBA, puede terminar esto rápida y fácilmente. Por favor haz lo siguiente:
1. Mantenga pulsado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. En la Microsoft Visual Basic para aplicaciones ventana, haga doble clic Esta sesión de Outlookn del Proyecto1 (VbaProject.OTM) panel para abrir el modo y luego copie y pegue el siguiente código en el módulo en blanco.
Código VBA: correos electrónicos de respuesta automática con mensaje original:
Public WithEvents xlItems As Outlook.Items
Private Sub Application_Startup()
Set xlItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub xlItems_ItemAdd(ByVal objItem As Object)
Dim xlReply As MailItem
Dim xStr As String
If objItem.Class <> olMail Then Exit Sub
Set xlReply = objItem.Reply
With xlReply
xStr = "<p>" & "Hi, Your email has been received. Thank you!" & "</p>"
.HTMLBody = xStr & .HTMLBody
.Send
End With
End Sub
3. Luego guarde y cierre la ventana del código, cierre o reinicie Outlook para que el código VBA surta efecto. Ahora, cuando reciba correos electrónicos, Outlook le enviará una respuesta automática con el mensaje original como se muestra en la siguiente captura de pantalla:
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.
