Inicio MS / Office

VBScript – Responder automáticamente determinado correo electrónico 

0


Ultima Actualización del Artículo: Abr 19, 2017

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
COMPARTIR
Mi nombre es Fernando, soy analista de sistemas actualmente trabajo en una empresa con mas de 200 empleados que utilizan equipo de computo al cual se les da soporte en el departamento. Uno de mis pasatiempos fuera de la empresa es escribir artículos para PortalMasTips donde documento los problemas, inquietudes y detalles interesantes que se presentan.

Deja un comentario...