Exporter un graphique en Image JPG

[Amilo]

Re bonsoir,

Je suis tombé par hasard sur un code VBA qui permet d'exporter un graphique en Image,

après quelques tentatives, je ne parviens pas à éxécuter ce code..!!!

Sub GrapheEnImage()
Dim MyChart As Chart
Set MyChart = ActiveSheet.ChartObjects(1).Chart
MyChart.Export FileName:="C:\Documents and Settings\My Documents\", filtername:="JPG"
End Sub


Après plusieurs tests j'ai soit le message : "chemin d'accès introuvable" soit "Pas de permission....".....!!!

Je vous joins un fichier avec le code légèrement modifié au niveau du chemin d'accés.

Ai-je oublié une étape ???

Merci d'avance

 

[chris]

Re : Exporter un graphique en Image JPG

Bonjour

A 1ère vue il manque le nom du fichier à créer.

 

[JCGL]

Re : Exporter un graphique en Image JPG

Bonjour à tous,

Peux-tu essayer :

Sub GrapheEnImage()
Dim MyChart As Chart
Set MyChart = ActiveSheet.ChartObjects(1).Chart
MyChart.Export Filename:="C:\Users\Amilo\Desktop\Test.jpg" ', filtername:="JPG"
End Sub

A+ à tous

Édition : Oups... Re Chris et Re Bise

 

[Amilo]

Re : Exporter un graphique en Image JPG

Bonsoir Chris, JCGL,

Hé oui c'était bien ça...le titre manquant, c'est magique.

Mais ou ai-je la tête....???

Mille mercis à vous...

Bonne soirée