Bonjour,
J'ai un souci car je voudrais un grahique qui m'affiche plusieurs courbes superposées, mais le nombre de courb est une variable( d'où la boucle for) et d'autre part le nombre de valeurs pour chaque séries aussi dépend d'une variable.Voici mon code:
Charts.Add
ActiveChart.ChartType = xlLineMarkers
For k = 1 To nbformules
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(k).Values "=final[/COLOR]!R" & (2 + k) & "C3:R" & (2 + k) & "C" & (3 + compteur1(1))
(c'est à cette ligne que ça bug!)
ActiveChart.SeriesCollection(k).Name = "formule d'indexation" & k
ActiveChart.SeriesCollection(k).Values = "=final!R2C3:R12C" & (3 + compteur1(1))
ActiveChart.Location xlLocationAsNewSheet, "évolution"
next k
Et il me dit que la méthode values de la classe series a échoué.
J'ai essayé avec cette forme aussi:
'ActiveChart.SeriesCollection(k).Values = Worksheets("SAISIE").Range(Cells(2+k, 3), Cells(2+k, 3 + compteur1(0)))
si quelqu'un peut m'expliquer ce serait assez merveilleux.
J'ai un souci car je voudrais un grahique qui m'affiche plusieurs courbes superposées, mais le nombre de courb est une variable( d'où la boucle for) et d'autre part le nombre de valeurs pour chaque séries aussi dépend d'une variable.Voici mon code:
Charts.Add
ActiveChart.ChartType = xlLineMarkers
For k = 1 To nbformules
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(k).Values "=final[/COLOR]!R" & (2 + k) & "C3:R" & (2 + k) & "C" & (3 + compteur1(1))
(c'est à cette ligne que ça bug!)
ActiveChart.SeriesCollection(k).Name = "formule d'indexation" & k
ActiveChart.SeriesCollection(k).Values = "=final!R2C3:R12C" & (3 + compteur1(1))
ActiveChart.Location xlLocationAsNewSheet, "évolution"
next k
Et il me dit que la méthode values de la classe series a échoué.
J'ai essayé avec cette forme aussi:
'ActiveChart.SeriesCollection(k).Values = Worksheets("SAISIE").Range(Cells(2+k, 3), Cells(2+k, 3 + compteur1(0)))
si quelqu'un peut m'expliquer ce serait assez merveilleux.