[VBA Excel] Comment rajouter une courbe dans un graphe existantRésolu

Question

Bonjour,
J'aimerai savoir comment rajouter une courbe dans un graphe existant &#224; l'aide d'une macro.
J'ai essay&#233; le code suivant:

ActiveSheet.ChartObjects("Graph2").Activate
With ActiveChart
    .SeriesCollection.NewSeries
    .SeriesCollection(i).Name = "=Feuil2!RiC1"
    .SeriesCollection(i).XValues = "Feuil2!RiC2"
    .SeriesCollection(i).Values = "=Feuil2!RiC3"
End With

Mais il ne marche pas. Je crois que le probl&#232;me vient de ma variable i. Si je remplace ma variable i par un chiffre, le code marche. Mais je suis oblig&#233; d'indiquer la ligne par une variable car celle-ci change &#224; chaque ex&#233;cution. Quelqu'un peut-il m'aider?

Merci d'avance.

nanou1605 · Accepted Answer

Bonjour, 

A première vue, je crois que le problème vient de "=Feuil2!RiC1"
Il faut reconstruire le nom de la cellule

Essaye comme cela : 

ActiveSheet.ChartObjects("Graph2").Activate
With ActiveChart
    .SeriesCollection.NewSeries
    .SeriesCollection(i).Name = "=Feuil2!R" & i & "C1"
    .SeriesCollection(i).XValues = "Feuil2!R" & i & "C2"
    .SeriesCollection(i).Values = "=Feuil2!R" & i & "C3"
End With

Bonne continuation

Seb

sioux499 · Answer

Merci

[VBA Excel] Comment rajouter une courbe dans un graphe existant

2 réponses

Discussions similaires