Páginas

martes, 27 de mayo de 2014

VBA Excel: Como enviar un email desde Excel con VBA

Primero hay que activar la "librería de objetos de Outlook".  Ir a Tools/References y seleccionar Microsoft Office Outlook Object Library:



Luego de eso, hay que crear un objeto de outlook, en este caso un mail item. Este objeto tendrá sus métodos y propiedades:

Sub SendEmail()

Dim mlook As Outlook.MailItem
Set mlook = Outlook.Application.CreateItem(olMailItem)
mlook.To = "eljayan@gmail.com"
mlook.Subject = "test"
mlook.Send

End Sub

No hay comentarios:

Publicar un comentario