Bob, I'm getting an error when I put the code in. It doesn't like the For i =
1 T last row. It is giving me a complie error. Says an expects a "to" Any
suggestions?
Thanks

"Bob Phillips" wrote:

With Activesheet

LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
For i = 1 T LastRow

If IsNumeric(.Cells(i, "B").Value2) Then

.Cells(i, "B").Value2 = .Cells(i, "B").Value2 + .Cells(i,
"C").Value2
End If
Next i

--

HTH

Bob

"RM270" wrote in message
...
Hi all. Column A is a list of names. Column B is a number. Several more
columns of text. Column E is a number. I want to add Column E to B. Then I
want to print the sheet. Then I want to clear Column E, but keep the
results
in Column B. I need to do this so that I can keep adding numbers to column
B.

A B E
Joe Smith 80 4
Bob Brown 84 4

After adding, it looks like this:
Joe Smith 84
Bob Brown 88

Several days later, I want to add more numbers to Column B
Joe Smith 84 4
Bob Brown 88 3

After adding, it looks like this:
Joe Smith 88
Bob Brown 91

Can I do this? If so, please help, I'm at a loss.
Thanks in advance for any help.


.