[AntonioMX]

Buen día a todos,

 

Me pueden ayudar con una macro para que al recibir un mensaje con cierto texto en el asunto se reenvíe a direcciones especificas agregando cierto texto en el cuerpo del mensaje a enviar.

 

Espero me puedan ayudar.

 

Gracias por su tiempo.

 

Encontré este código pero no se donde indicar que solo si el correo que reciba tiene "X" asunto.

 

Sub ChangeSubjectForwardAttachment(item As Outlook.MailItem)
Dim oAtt As Attachment
strAtt = ""
For Each oAtt In item.Attachments
Debug.Print oAtt.FileName
Set myforward = item.Forward
 myforward.Recipients.Add "admin@portalmastips.com"
 myforward.Subject = "Reenvio archivos " '& oAtt.FileName
 myforward.HTMLBody = "Texto a enviar" & vbCrLf & item.HTMLBody
 myforward.Display 'Cambiar Display por Send si deseamos que se envie automatico.
 Exit Sub
Next oAtt
End Sub

[Carmen]

Para poder hacer el reenvio de correos de Outlook según un asunto, tienes opción de hacerlo con una macro, pero como es mas complejo, quizás te interese hacerlo con reglas de Outlook, es sencillo y te ahorrarás quebraderos de cabeza con la macro. te dejo los pasos.

 

 

Como reenviar correo Outlook segun asunto con reglas

 

1) Pulsa en Archivo > Información

 

2) Ahora debes pulsar en "Administrar reglas y alertas".

 

3) Te aparecerá una ventana para empezar a colocar tu regla en tu Outlook. Selecciona la opción "Nueva regla".

 

4) Ahora selecciona la opción "Aplicar regla a los mensajes que reciba" y pulsa en "Siguiente".

 

 

 

 

5) Ahora selecciona la opción "Con cierto texto de asunto o en el cuerpo del mensaje" y abajo debes seleccionar y poner el texto del asunto que cuando llegue un correo y tenga ese texto que pones lo reenviarás a X correos de otros. Pulsa en "Siguiente".

 

 

 

 

6) Ahora selecciona "Reenviarlo a personas o grupo publico", a continuación abajo verás que se puede pulsar en la opción "personas o grupo publico" y añades correos o grupo de correos que quieres enviarles. Luego pulsas en "Siguiente".

 

7) En el PARA abajo puedes escribir los correos que quieres que se les reenvie todos los correos que recibas con ese asunto que tiene esa o esas palabras que has indicado automáticamente.

 

8) Al darle a Siguiente verás que puedes hacer excepciones estrategicas o no. Puedes pulsar en "Finalizar" y ya la tendrás activa y aplicada esta regla y al recibir haría eso automáticamente.

 

 

 

 

Verás que te sale en el apartado de reglas y podrás editarla o quitarla cuando quieras desde ahí.

 

 

 

 

Espero que te sirva y ayuda esta sencilla opción para hacer justo lo que tu necesitas de reenviar correos con asunto concreto y tal.

 

Saludos.

[arios]

Hola Antonio. Lo han explicado perfecto pero aqui te lo dejo en video para que también lo veas en movimiento, seguro que te interesa. es sencillo reenviar correos con reglas en Outlook segun asunto.