
Enviar informes PDF generados desde Excel automáticamente puede ser una tarea eficiente si lo haces mediante el uso de macros de VBA (Visual Basic for Applications) y algún sistema de correo electrónico. Aquí te dejo un ejemplo básico de cómo podrías hacerlo:
- Crear el Informe en PDF:
Primero, necesitas asegurarte de que tu hoja de Excel se pueda convertir correctamente a PDF. Esto lo puedes hacer manualmente para probar y luego automatizarlo.
Sub ExportToPDF()
Dim FilePath As String
FilePath = "C:RutaATuArchivoInforme.pdf" ' Cambia esto a tu ruta deseada
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=FilePath
End Sub
- Enviar el PDF por Email:
Para enviar emails automáticamente, puedes usar Outlook desde VBA. Aquí te muestro un ejemplo de cómo podrías hacerlo:
Sub SendEmailWithPDF()
Dim OutlookApp As Object
Dim OutlookMail As Object
Dim FilePath As String
' Asegúrate de que el PDF ya está generado
FilePath = "C:RutaATuArchivoInforme.pdf"
' Crear instancia de Outlook
Set OutlookApp = CreateObject("Outlook.Application")
Set OutlookMail = OutlookApp.CreateItem(0)
With OutlookMail
.To = "destinatario@dominio.com" ' Cambia esto a la dirección deseada
.CC = "" ' Puedes añadir más destinatarios si necesitas
.BCC = ""
.Subject = "Informe PDF"
.Body = "Por favor, encuentra adjunto el informe en PDF."
.Attachments.Add FilePath
.Send
End With
' Limpiar
Set OutlookMail = Nothing
Set OutlookApp = Nothing
End Sub
- Automatizar el Proceso:
Puedes combinar los dos procedimientos en uno para simplificar el proceso:
Sub ExportAndSendPDF()
Call ExportToPDF
Call SendEmailWithPDF
End Sub
- Programar la Macro:
Si quieres programar la ejecución automática de esta macro, puedes integrar el uso de un script de Windows Task Scheduler que abra el archivo de Excel y ejecute la macro en un determinado horario. Configura el Task Scheduler para abrir un archivo .vbs que corra tus macros.
Recuerda:
- Cambiar las rutas y direcciones de correo para adaptarlas a tus necesidades.
- Tener Outlook instalado y configurado, ya que este código usa Outlook para enviar correos.
- Asegurarte de que la seguridad de macros en Excel está configurada para permitir la ejecución de macros.
Este método es bastante básico y podría adaptarse según condiciones específicas o necesidades avanzadas.
Conoce nuestros servicios



