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