Bonjour à tous,

Je suis débutante en VBA et j'ai besoin d'aide. Je veux envoyer un mail avec un fichier excel en pièce jointe ET un "body". J ai vu que la fonction sentmail ne marchait pas pour ce genre de problème. J'ai essayé une solution trouvée dans une discussion sur ce forum, mais ça ne marchait pas:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub envoyermail()
 
Shell """C:\Program Files (x86)\Microsoft Office\Office12\OUTLOOK.EXE"""
Set ol = New Outlook.Application
Set olmail = ol.CreateItem(olMailItem)
With olmail
    .To = "nomprenom@mail.fr"
    .Subject = "objet" 
    .Body = "blablabla" 
    .Attachments.Add "TEST.xls"
 
End With
 
End Sub
Le programme plante à la deuxième ligne. Je précise que le fichier "TEST.xls" est ouvert (pas besoin de mettre le chemin exact pour le récupérer).Pouvez sous m'aider?

Merci bcp