El siguiente código VBScript es para responder determinado correo electrónico con un mensaje ya establecido al cuerpo de correo, puede editar el asunto y cuerpo de correo de así requerirlo.
Instrucciones de Uso
1.- Abrir el editor de Visual Basic (ALT+F11).
2.- Insertar un modulo nuevo (Insert > Module).
3.- Copiar el código VBScript.
4.- Editamos los campos de las lineas 6 y 8; también podemos editar la linea 10 si deseamos que se envíe automáticamente.
5.- Ahora debemos crear la regla que ejecute el VBScript cuando cumpla las condiciones que estableceremos.
Para mas información de configuración ver: Como utilizar el Editor VBA en Office (Utilizar Macros VBScript) y Outlook – Crear y configurar reglas
Código
Sub AutoReply(Item As Outlook.MailItem)
Dim objReply As Outlook.MailItem
Set objReply = Item.Reply
With objReply
.Subject = "RE: " & objReply.Subject
'Texto del cuerpo de correo
.HTMLBody = "Recibido.<bt><br>" & objReply.HTMLBody
.Send
End With
Set objReply = Nothing
End Sub
