How do you calculate a column using a loop?
A B C
1 100 200 ?
2 13 17 ?
..
..
..
N

Perhaps you can give a better explanation? Is this homework?

--
Don Guillett
SalesAid Software

wrote in message
oups.com...
How do you calculate a column using a loop?
A B C
1 100 200 ?
2 13 17 ?
.
.
.
N

Sub CalcColumn()
Dim cell as Range
Dim rng as Range
set rng = range(cells(1,2),cells(1,2).End(xldown))
for each cell in rng
cell.offset(0,1).Value = cell.Value + cell.offset(0,-1).Value
Next
End Sub

--
Regards,
Tom Ogilvy


" wrote:

How do you calculate a column using a loop?
A B C
1 100 200 ?
2 13 17 ?
..
..
..
N

What answer would you like to have in C?

" wrote:

How do you calculate a column using a loop?
A B C
1 100 200 ?
2 13 17 ?
..
..
..
N