P
Pibor
Guest
Bonjour, ou Bon matin !
J'ai trouvé ce fichier dans le forum :
Lien supprimé
Il correspond tout à fait à une partie de ce que je souhaite faire.
Par contre dans cette partie :
'Création du message et envoi
Set ElémentCourrier = ApplicOutlook.CreateItem(0)
With ElémentCourrier
.Attachments.Add ActiveWorkbook.FullName
.To = Email
.Subject = Sujet
.Body = Msg
.Display
Je souhaite joindre un fichier Word (Info.doc) ouvert, au lieu de l'ActiveWorkbook.
Je sèche depuis... longtemps ! et ne trouve pas de solution.
Ceci est il possible ?
Merci pour l'aide
Amicalement
J'ai trouvé ce fichier dans le forum :
Lien supprimé
Il correspond tout à fait à une partie de ce que je souhaite faire.
Par contre dans cette partie :
'Création du message et envoi
Set ElémentCourrier = ApplicOutlook.CreateItem(0)
With ElémentCourrier
.Attachments.Add ActiveWorkbook.FullName
.To = Email
.Subject = Sujet
.Body = Msg
.Display
Je souhaite joindre un fichier Word (Info.doc) ouvert, au lieu de l'ActiveWorkbook.
Je sèche depuis... longtemps ! et ne trouve pas de solution.
Ceci est il possible ?
Merci pour l'aide
Amicalement