Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel.j
Bonsoir, Sub GraphJPG() Dim MyChart As Chart Set MyChart = ActiveSheet.ChartObjects(1).Chart MyChart.Export FileName:="C:ajetergraph1.jpg", filtername:="JPG" End Sub
-- Daniel MVP Excel FAQ du Forum Microsoft Public Fr Excel http://dj.joss.free.fr/faq.htm a écrit dans le message de news: 28e001c4aaf1$282f5f50$ | J'aimerais a partir d'une macro sauver un graphique sous | format JPG. Comment dois-je m'y prendre ?
Bonsoir,
Sub GraphJPG()
Dim MyChart As Chart
Set MyChart = ActiveSheet.ChartObjects(1).Chart
MyChart.Export FileName:="C:ajetergraph1.jpg", filtername:="JPG"
End Sub
--
Daniel MVP Excel
FAQ du Forum Microsoft Public Fr Excel
http://dj.joss.free.fr/faq.htm
<anonymous@discussions.microsoft.com> a écrit dans le message de news:
28e001c4aaf1$282f5f50$a501280a@phx.gbl...
| J'aimerais a partir d'une macro sauver un graphique sous
| format JPG. Comment dois-je m'y prendre ?
Bonsoir, Sub GraphJPG() Dim MyChart As Chart Set MyChart = ActiveSheet.ChartObjects(1).Chart MyChart.Export FileName:="C:ajetergraph1.jpg", filtername:="JPG" End Sub
-- Daniel MVP Excel FAQ du Forum Microsoft Public Fr Excel http://dj.joss.free.fr/faq.htm a écrit dans le message de news: 28e001c4aaf1$282f5f50$ | J'aimerais a partir d'une macro sauver un graphique sous | format JPG. Comment dois-je m'y prendre ?