allez …
ajouter ligne 2&3 et supprimer ligne 4 (je ne l’ai pas testé)
.Subject = Sujet 'le sujet
.Attachments.Add ThisWorkbook.Path & "\E68D88.png" 'ajouter votre signature comme PJ
.HTMLBody = Replace(contenu, vbLf, "<br>") & "<img src=""cid:E68D88.png"" width=" & 397 & ">" 'transformer le body en HTML & intégrer signature
'.Body = contenu 'le contenu
.Attachments.Add fichierpdf 'si piéce jointe
Exemple 1 EMAIL (2).xlsm (110,5 Ko)