Effacer graphique ... help !!
Re bonjour !!
Encore un pb, pour changer ....
En faite j'arrivee pas a effacer un graphique avec ma macro car a chaque fois que je la relance les graphiques se supperposent.
Je connais :
Selection.delete
Mais je n'arrive pas a savoir comment selectionner le graph.
Voici les lignes du graph :
Charts.Add
ActiveChart.ChartType = xlXYScatterLinesNoMarkers
ActiveChart.SetSourceData Source:=Sheets("Courbes").Range("A1")
ActiveChart.SeriesCollection.NewSeries
DerCol = Sheets("Conso.").Range("IV2").End(xlToLeft).Column
ActiveChart.SeriesCollection(1).XValues = "=Conso.!R2C14:R2C" & DerCol
ActiveChart.SeriesCollection(1).Values = "=Conso.!R3C14:R3C" & DerCol
ActiveChart.Location Where:=xlLocationAsObject, Name:="Courbes"
De plus je cherche a savoir quelle ligne correspond a l emplacement du graphique sur ma page afin de pouvoir le placer ou j'ai envi.
Merci d'avance les pro d'excel
Crdlt,
SANG1
Re bonjour !!
Encore un pb, pour changer ....
En faite j'arrivee pas a effacer un graphique avec ma macro car a chaque fois que je la relance les graphiques se supperposent.
Je connais :
Selection.delete
Mais je n'arrive pas a savoir comment selectionner le graph.
Voici les lignes du graph :
Charts.Add
ActiveChart.ChartType = xlXYScatterLinesNoMarkers
ActiveChart.SetSourceData Source:=Sheets("Courbes").Range("A1")
ActiveChart.SeriesCollection.NewSeries
DerCol = Sheets("Conso.").Range("IV2").End(xlToLeft).Column
ActiveChart.SeriesCollection(1).XValues = "=Conso.!R2C14:R2C" & DerCol
ActiveChart.SeriesCollection(1).Values = "=Conso.!R3C14:R3C" & DerCol
ActiveChart.Location Where:=xlLocationAsObject, Name:="Courbes"
De plus je cherche a savoir quelle ligne correspond a l emplacement du graphique sur ma page afin de pouvoir le placer ou j'ai envi.
Merci d'avance les pro d'excel
Crdlt,
SANG1
Dernière édition: