Una acción poco empleada, en mi opinión, dentro de Outlook, es Retrasar la entrega...lo que nos permite programar el momento de envío de un email...
Veremos en este artículo cómo conseguirlo desde la programación en Excel empleando la propiedad .DeferredDeliveryTime
Insertamos en la ventana de código del módulo estándar el siguiente código:
Tras lanzar la macro podemos comprobar en la carpeta de Bandeja de salida el email con la programación de fecha y hora de entrega...
Veremos en este artículo cómo conseguirlo desde la programación en Excel empleando la propiedad .DeferredDeliveryTime
Insertamos en la ventana de código del módulo estándar el siguiente código:
Sub RetrasarEnvio() 'OJOOO.. activar referencia/librería Microsoft Outlook 16.0 Object Library o superior !!! Dim olMailItm As Outlook.MailItem Set olMailItm = Outlook.CreateItem(olMailItem) With olMailItm .To = "excelforo@gmail.com" .Subject = "Retrasar o programar envío email..." .Body = "Hola!!" & vbNewLine & "Saludos cordiales" .DeferredDeliveryTime = "13/09/2019 13:13:13 PM" 'retrasamos el envío a una fecha concreta .Display .Send End With End Sub
Tras lanzar la macro podemos comprobar en la carpeta de Bandeja de salida el email con la programación de fecha y hora de entrega...
Da error al ejecutar!
ResponderEliminarHola Iván,
Eliminarqué tal estás?, un placer saludarte.
Agradecerte el detalle del error que te devuelve...
¿Probaste a activar la referencia/biblioteca de Microsoft Outlook???
Un cordial saludo