
Para enviar correos desde Excel sin mostrar la interfaz de Outlook al usuario, puedes utilizar VBA (Visual Basic for Applications) para automatizar el proceso. Aquí tienes un ejemplo de cómo configurar un script en VBA para enviar correos electrónicos sin que la ventana de Outlook se muestre:
Sub EnviarCorreo()
Dim OutlookApp As Object
Dim OutlookMail As Object
Dim destinatario As String
Dim asunto As String
Dim cuerpo As String
' Crea un objeto de aplicación de Outlook
On Error Resume Next
Set OutlookApp = GetObject(, "Outlook.Application")
If OutlookApp Is Nothing Then
Set OutlookApp = CreateObject("Outlook.Application")
End If
On Error GoTo 0
' Configura el mensaje de correo
Set OutlookMail = OutlookApp.CreateItem(0)
With OutlookMail
destinatario = "correo@ejemplo.com" ' Cambia esto por la dirección de correo del destinatario
asunto = "Asunto del correo"
cuerpo = "Este es el cuerpo del correo."
.To = destinatario
.Subject = asunto
.Body = cuerpo
' Envía el correo
.Send
End With
' Limpia los objetos
Set OutlookMail = Nothing
Set OutlookApp = Nothing
End Sub
- Abre Excel y presiona `ALT + F11` para abrir el Editor de VBA.
- Inserta un nuevo módulo:
- Ve a `Insertar` > `Módulo`.
- Escribe el siguiente código VBA en el módulo:
- Personaliza el correo:
- Cambia `correo@ejemplo.com` al destinatario deseado.
- Modifica `Asunto del correo` y `Este es el cuerpo del correo.` según tus necesidades.
- Ejecuta la macro:
- Cierra el Editor de VBA.
- Vuelve a Excel y presiona `ALT + F8` para abrir el cuadro de diálogo de Macros.
- Selecciona `EnviarCorreo` y haz clic en `Ejecutar`.
Este script enviará un correo electrónico utilizando Outlook sin mostrar su interfaz al usuario. Asegúrate de que Outlook esté correctamente configurado en tu sistema antes de ejecutar esta macro. Además, ten en cuenta que algunas configuraciones de seguridad pueden requerir tu autorización para enviar correos mediante VBA.
Conoce nuestros servicios



