Joindre un Fichier dans un Userform

hawk91

XLDnaute Nouveau
Intégreer une 2eme piece jointe

Bonjour à tous,

Je souhaiterai que l'utilisateur puisse joindre un fichier, pour le moment j'utilise ce code pour l'envoi d'un mail.
Code:
Private Sub CommandButton3_Click()

lenom = ThisWorkbook.Name
Workbooks(lenom).SendMail Recipients:="j@ope.com", _
                          Subject:="Engagement à valider", _
                          ReturnReceipt:=True
With Mail
Je pense utiliser ceci pour une pièce jointe
Code:
join_file = Application.GetOpenFilename(FTYPE_ALL, 0, "Ajouter un fichier", "Joindre")
cela ce passe correctement mais comment "l'intégrer" au message?? Merci
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 493
Messages
2 088 955
Membres
103 989
dernier inscrit
jralonso