Envoyer un graphique par e-mail

[morantinp]

Bonjour à tous

J'aimerais savoir comment envoyer un graphique par e-mail avec une macro

D'avance merci

 

[Brigitte]

Re : Envoyer un graphique par e-mail

Bonjour,

mDF avait concocté une macro qui permettait d'envoyer une feuille, préalablement sélectionnée, par e-mail, si le graphique est dans la feuille, ca pourrait faire l'affaire ?

Si oui, voici le code à adapter bien sûr :

Sub MacroMail()
'Autant prendre de bonnes habitudes : en VBA, on déclare toujours les variables utilisées !
Dim AccuseReception As Boolean
Dim Sujet As String
      '
      ActiveWorkbook.Windows(1).SelectedSheets.Copy
      AccuseReception = True
      Sujet = "Titre au choix"
      ActiveWorkbook.SendMail "", Sujet, AccuseReception
      'ActiveWorkbook.Close False
End Sub

Bonne journée..


PS : ceci dit, tu auras certainement mieux rapidement, mais au cazou, ca te dépannera peut être.