Discussion :

[Yopcoo]

Bonjour,

J'aimerai pouvoir publier un graphique avec la collection PublishObjects. Cependant lorsque je renseigne un type xlSourceChart j'ai une erreur 1004. J'ai beau chercher les références à renseigner dans la méthode je n'arrive pas à débuguer. Quelqu'un a-t-il une idée?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Sub PublicationGraphique()
 
Dim chrt As ChartObject
Dim ws As Worksheet
Set ws = Sheets("Feuil1")
Dim co As ChartObject
Set co = ws.ChartObjects(1)
 
Debug.Print "Nom : " + co.Chart.Name
 
With ActiveWorkbook.PublishObjects.Add(xlSourceChart, "graph.htm", ws.Name, co.Chart.Name, xlHtmlStatic, "div_graph", "MonGraph")
    .Publish (True)
End With
 
End Sub

Export Graphique.xlsx

[joe.levrai]

Bonjour,

sauf erreur, le deuxième argument est le chemin complet où doit-être enregistré le fichier ? Et pas uniquement le nom du fichier ?

[Yopcoo]

Bonjour,

En effet j'ai aussi essayé avec un chemin absolu. Le soucis c'est qu'avec le debug vba je ne sais sais pas quel argument pose problème.