Discussion :

[yahi.jye]

bonsoir,
j'essaie de faire un export de graphique suivant cette méthode :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub ExportGraphEnGif()
Dim NomFich
    NomFich = "C:\test vba\LeGraph.gif"
    Worksheets("Feuil1").Shapes("Chart 1").Select
    ActiveChart.Export NomFich, "GIF"
End Sub

j'ai l'erreur suivante sur l'avant dernière ligne (ActiveChart.Export NomFich, "GIF"):
erreur '1004'
la méthode 'Export' de l'objet '_Chart' à échoué

pour controler que le nom du graph est le bon j'ai :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub Graph()
 Dim Graph As ChartObject
For Each Graph In Sheets(1).ChartObjects
MsgBox "" & Graph.Name & "" 
Next Graph
End Sub

qui me dit que c'est le bon nom.. Alors qu'est ce qui ne va pas !
je suis avec excel2003.

merci de votre aide

yahi

[tirex28]

Bonsoir,

Peut etre comme ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Worksheets("Feuil1").ChartObjects("Chart 1").Chart.Export NomFich, "GIF"

Cordialement,

Tirex28/

[SilkyRoad]

bonjour

j'essaie de faire un export de graphique suivant cette méthode :

ta procédure fonctionne sans problème chez moi.
avais tu installé une version d'évaluation d'office 2007 sur ton poste, car cette version fait ensuite planter la méthode Export.


bonne journée
michel

[yahi.jye]

Non c'est pas office 2007.
J'ai essayé avec office XP de mon boulot, mais sans les code d'activation produit, ca limite l'utilisation mais ca fonctionne. j'ai donc réinstallé office 2003 (version inconnu..) sans effacer la version précédente, tout fonctionne et pas de demande d'activation du produit.

Pourvu que ca dur !

yahi