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.
Je pense utiliser ceci pour une pièce jointe
cela ce passe correctement mais comment "l'intégrer" au message?? Merci
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
Code:
join_file = Application.GetOpenFilename(FTYPE_ALL, 0, "Ajouter un fichier", "Joindre")
Dernière édition: