Discussion :

[fmorretton]

Bonjour,

J'ai un programme qui exporte des graphiques excel dans word et qui marche très bien.
Lorsque j'ouvre ce programme avec un autre ordinateur la méthode export ne fonctionne plus.

J'ai fait le test suivant pour trouver mon problème.

Code :

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

Feuil1.ChartObjects(1).Chart.Export Filename:="C:\graphe.gif", filtername:="GIF"

Cela marche sur un pc mais pas sur l'autre.
J'aimerais mettre à jour les bibliothèques vba mais je ne sais pas dans laquelle se trouve la méthode export des objets chart.

Auriez vous une idée?

Merci

[ouskel'n'or]

A tout hasard, regarde ici
Tu dis

J'avais oublié, j'avais ça

Code :

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

1
2
3
4
5
6
7
Public Sub EnregistrerUnGrapheEnTantQueGif()
Dim NomComplet As Variant
    ActiveSheet.ChartObjects("Graphique 1").Activate
    NomComplet = Application.GetSaveAsFilename("C:\MesGraphes\MonFichierb.gif", _
                    "Fichiers GIF (*.gif), *.gif")
    ActiveChart.Export NomComplet, "GIF"
End Sub

A+

[fmorretton]

A vu d'oeil, j'avais un problème de filtre de conversion graphique.
En ouvrant mes points gif manuellement, Word m'a proposé de réinstaller ces filtres de conversion.
C'est ce que j'ai fait et depuis ca remarche.

A noter que j'avais à peu près résolu mon problème en utilisant la méthode copypicture qui fait copie l'image dans le presse papiers sans créer de fichier intermédiaire.

Merci

[ouskel'n'or]

Bref, je n'ai servi à rien !