Je suis désolé, je ne sais pas comment faire pour insérer des graphiques dans le corps du mail. Vous devriez regarder sur Google ou directement écrire un nouveau poste sur ce forum car le sujet n'est plus le même.
En revanche, plutôt qu'insérer un graphique, vous pourriez peut-être joindre un PDF contenant ces graphiques :
Dim PDF$
PDF = "CheminduPDF\NomduPDF.pdf"
If Dir(PDF) <> "" Then 'permet de s'assurer que le PDF existe
MonMessage.Attachments.add PDF 'où MonMessage est votre objet Mail
End If
Ça ne correspond probablement pas à votre besoin mais sait-on jamais...
Bonne soirée,