¿Cómo envío un correo electrónico usando una macro firmada en Outlook?
Por ejemplo: Daily Mail
El destinatario, el asunto y la firma son básicamente los mismos, solo necesitas cambiar la fecha en el asunto
Otro contenido puede lograrse mediante plantillas.
Simplemente escribe una función VBA para hacerlo.
La práctica descubrió que Outlook no admite la grabación de macros, lo que causó algunos problemas.
Después de buscar en Internet, encontré el siguiente código para enviar correos electrónicos usando programación VBA: New Mail Set OutApp = CreateObject("Outlook.Application") 'Crear un objeto de Outlook
OutApp.Session.Logon 'Iniciar sesión en MAPI
Configurar OutApp. p>
Establecer OutMail = OutApp.CreateItem(olMailItem) 'Crear un nuevo objeto de correo
'Establecer encabezados de correo, destinatarios, etc.
Usar OutMail< / p>
.To = strTo 'To
.CC = strCC 'Cc.
.BCC = ""
.Subject = strSubject'Subject
Entre ellos, el Asunto lee la fecha actual
mDate = Formato ( Ahora, "yyyy-MM-dd")
strSubject = "[Daily]" & mDate
Cuando esta macro se ejecuta de esta manera, se muestra una carta con el encabezado de fecha actual El correo electrónico ha sido generado y esperando ser enviado
.