Un petit souci en automation Outlook (reference Microsoft Outlook 9)
Private Sub Command1_Click()
Set myolapp = CreateObject("Outlook.Application")
Set mail = myolapp.CreateItem(olMailItem)
Set destinataire = mail.Recipients.Add("sebastiendelestre@wanadoo.fr")
mail.Subject = "Sujet"
mail.Body = "Corps du message"
mail.Send.To destinataire
End Sub
ce code fonctionne mais il me dit qu'il manque un objet sur la dernière
ligne (mail.Send.To destinataire). Si quelqu'un peut m'aider c'est cool.
Merci