Création d'un email à partir d'Excel

[yorrick]

Bonjour,

J'aimerais savoir si il est possible à partir d'excel
via une macro de créer un email.

Dans cet email il faudrait que je puisse taper l'email
qui peut etre différent.

Mais la ou je pense plus compliquer c'est d'inclure en
piece jointe un fichier texte se trouvant dans un repertoire.

En fait pour simplifié ma demande est il possible via excel
d'ouvrir une fenetre d'envoi de mail outlook.

Merci

 

[Creepy]

Bonjour à toutes & tous,

Essaie ca comme code :

Sub SendMail_Outlook () 

'Avant de lancer cette macro, Dans l'éditeur VBA: Faire Menu / Tools / Reference / Cocher 'Microsoft Outlook Library' 

   Dim ol As New Outlook.Application 
   Dim olmail As MailItem 
   Dim CurrFile As String 

   Set ol = New Outlook.Application 
   Set olmail = ol.CreateItem(olMailItem) 
   With olmail 
      .To = range('a3').value 
      .Subject = Range('a1').Value 
      .Body = 'Contenu ' & Range('a2').Value 
      .Attachments.Add 'c:\\data\\essai.doc' 
      .Display '.Send 
'On peut switcher entre .send et .display selon que l'on veut envoyer le mail (send) ou seulement le préparer et le vérifier(display) 
   End With 
End Sub

++

Creepy

 

[yorrick]

Merci beaucoup de ton aide Creepy.


Ca marche pil poil ...

 

[guiman]

Bonjour,
Je viens d'utiliser : ca marche nickel.

Par contre comment forcer les saut de ligne dans le corps de texte?

Merci d'avance

 

[guiman]

Laissez tomber j'ai trouvé. Désolé d'avoir posté pour rien