Bonjour,
je cherche a automatiser une quantité importante de graphique avec VBA (sous excel).
afin de pourvoir executer ma macro sous plusieurs onglets, je dois remplacer un mot dans une formule de serie.
lorsque j'ai des courbes sur mon graphique le code suivant fonctionne :
en revanche lorsque j'ai un histogramme, cela ne fonctionne plus
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Dim se As Series Dim Numgraph As Integer For Numgraph = 162 To 186 ActiveSheet.ChartObjects("Graphique " & Numgraph).Activate For Each se In ActiveChart.SeriesCollection se.Formula = Replace se.Formula, "OuvertureHT_All ", "FermetureHT_All CC") Next Next Numgraph end sub
"impossible de definir la propriété Formula de la classe series"
du coup j'ai remplacé Formula par Xlvalue
et là j'obtiens "incompatibilité de type"
quelqu'un sait-il comment résoudre ce problème ?
Merci.
Partager