problème de syntaxe dans la partie source d'un graph

Bonjour,
je veux créer un graph a partir d'une plage de cellule

Code:

---

1 2 3 4 5 6 7 8 9

Dim Graph As Chart Set Graph = Charts.Add With Graph .ChartType = xlPie .SetSourceData Source:=Sheets("Récap_3ème tri_V_élo1").Range(Cells(j + 15, p).Address, Cells(j + 16, p).Address), PlotBy:=xlColumns .Location Where:=xlLocationAsObject, Name:= _ "Récap_3ème tri_V_élo1" End With

---

Le programme marche pas sur la ligne en bleu avec cells. Je ne comprends pas sachant que dans ma structure des cells j+16 représente ma ligne avec j variable integer et p représente ma colonne avec p variable integer.
Est ce que quelqu'un peut m'aider?

Bonjour,

Lorsqu'on écrit

Code:

---

Sheets(1).Range(Cells(x, y).Address, Cells(x, y).Address)

---

il faut également préciser la feuille d'où proviennent les Cells

Code:

---

Sheets(1).Range(Sheets(1).Cells(x, y).Address, Sheets(1).Cells(x, y).Address)

---

Donc pour ton code, essaie ceci :

Code:

---

1 2 3 4 5 6 7 8 9

Dim Graph As Chart, Sh As Worksheet Set Graph = Charts.Add Set Sh = Sheets("Récap_3ème tri_V_élo1") With Graph .ChartType = xlPie .SetSourceData Source:=Sh.Range(Sh.Cells(j + 15, p).Address, Sh.Cells(j + 16, p).Address), PlotBy:=xlColumns .Location Where:=xlLocationAsObject, Name:= _ "Récap_3ème tri_V_élo1" End With

---

Merci beaucoup ça marche.