Referencing cells in a loop
 

Hi,
I am trying to generate automatically some graphs with a
macro, but I cannot find how to reference the cells.

What I want to do is to copy the graph, and then to change
the "source data". I have 20 graphs to do, so I need to
increment the row number.

Here is the macro for 1 graph:

Sub Macro2()
Sheets("Chart1").Select
Sheets("Chart1").Copy Befo=Sheets(2)
Sheets("Chart1 (2)").Select
Sheets("Chart1 (2)").Name = "Chart2"
ActiveChart.PlotArea.Select
ActiveChart.SeriesCollection(1).Values = _
"=(Sheet1!R26C2,Sheet1!R7C3,Sheet1!R7C5,Sheet1 !
R7C7)"
ActiveChart.SeriesCollection(1).Name = "=""titi-2"""
End Sub


What I need to do is to vary R7 from R7 to R26. (and chart
2 form 2 to 22)

I already tried with "Rj" or cells(j,7), but nothing seems
to work!

Thanks for your help.