bonjour à tous,
suite à de nombreuses recherches, je suis arrivé à ce code qui fonctionne :
cependant je souhaite aussi mettre incorporer en piece jointe mon fichier excel en cours (activeworkbook) mais je ne trouve pas la bonne syntaxe, pouvez vous m'aider sur ce point?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Dim objOutlook As New Outlook.Application Dim objOutlookMsg As Outlook.MailItem Set objOutlookMsg = objOutlook.CreateItem(olMailItem) With objOutlookMsg .To = "tonton@tata" .Subject = "blablabla" .Body = "" .Display End With Set objOutlookMsg = Nothing
aussi, si un utilisateur ne possede pas outlook sur son poste, ce code fonctionnera t-il?
merci de votre aide
cordialement
Partager