Agregue la fecha de hoy al abrir la plantilla de correo electrónico guardada

Question

Quiero agregar un mensaje y la fecha en la que abro una plantilla de correo electrónico que he guardado.

Solo pude llegar al siguiente código:

Private Sub adddate()
    .Item.Subject = "Prep Status Report " & Format(Date, "dd/MM/yyyy")
End Sub

¿Cómo puedo mejorar esto para que funcione según lo previsto?

La línea de asunto debe decir: Prep Status Report 10/12/2018si se publica el 10 de diciembre

Answer 1

Puede insertar su línea de código en el código del Método 2 en "2 métodos rápidos para crear nuevos correos electrónicos a partir de una plantilla con Outlook VBA" enhttps://www.datanumen.com/blogs/2-quick-methods-create-new-emails-template-outlook-vba/

• En su línea de código, cambie .Itema NewMail.
• en el código de Datanumen, cambie la ruta del archivo a la ruta del archivo de su plantilla.

Además, puede agregar la macro a su barra de herramientas de acceso rápido, si desea ejecutarla con un solo clic.