Bon jour a tous !!
Je cherche a adapter cette formule afin que mon graphique sélectionne les données jusqu'à la dernière cellule ou il y a une valeure.
En gros j'ai des données ayant un nombre variable et qui sont sur une ligne. Voici ce qui doit ètre adapté :
Charts.Add
ActiveChart.ChartType = xlXYScatterLinesNoMarkers
ActiveChart.SetSourceData Source:=Sheets("Courbes").Range("A1")
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).XValues = "=Conso.!R2C14:R2C31"
ActiveChart.SeriesCollection(1).Values = "=Conso.!R3C14:R3C31"
ActiveChart.Location Where:=xlLocationAsObject, Name:="Courbes"
With ActiveChart
Merci beaucoup pour votre aide.
Crdlt,
S@nG1
Je cherche a adapter cette formule afin que mon graphique sélectionne les données jusqu'à la dernière cellule ou il y a une valeure.
En gros j'ai des données ayant un nombre variable et qui sont sur une ligne. Voici ce qui doit ètre adapté :
Charts.Add
ActiveChart.ChartType = xlXYScatterLinesNoMarkers
ActiveChart.SetSourceData Source:=Sheets("Courbes").Range("A1")
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).XValues = "=Conso.!R2C14:R2C31"
ActiveChart.SeriesCollection(1).Values = "=Conso.!R3C14:R3C31"
ActiveChart.Location Where:=xlLocationAsObject, Name:="Courbes"
With ActiveChart
Merci beaucoup pour votre aide.
Crdlt,
S@nG1