Graphique par VBA

tinel

XLDnaute Nouveau
Bonjour à tous!

je voudrais crée plusieurs graph par VBA. Pour ce faire je voudrait faire quelque chose comme : définir la valeur de ma ligne et ensuite remplacer les coordonnées des lignes dans cette commande

ActiveChart.SeriesCollection(1).Values = '=Data!R2C8:R2C10'

par quelque chose comme

ActiveChart.SeriesCollection(1).Values = '=Data!ligneC8:ligneC10'

Je ne sais pas comment passer cette commande
J'espère que je m'explique bien

Voici ma commande au complet:

Dim ligne As Integer
ligne = 2

Charts.Add
ActiveChart.ChartType = xlPie
ActiveChart.SetSourceData Source:=Sheets('Data').Range('A1:K61'), PlotBy:= _
xlColumns
ActiveChart.SeriesCollection(1).Delete
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).Values = '=Data!ligneC8:ligneC10'
ActiveChart.SeriesCollection(1).Name = '=Data!ligneC2:ligneC4'
ActiveChart.Location Where:=xlLocationAsObject, Name:='Feuil2'
ActiveChart.ChartTitle.Select

Merci beaucoup!
tinel
 

Discussions similaires

Statistiques des forums

Discussions
312 282
Messages
2 086 772
Membres
103 391
dernier inscrit
lrol