It isn't clear this is what you want, but for your consideration:

Sub Tester1()
Dim rng as Range, cell as Range
set rng = Range(Cells(1,1),Cells(1,1).End(xldown))
for each cell in rng
cell.offset(0,2).Value = Cell.Value + cell.offset(0,1).value
Next
End Sub

--
Regards,
Tom Ogilvy

"FredVC" wrote in message
...
I have found nothing that tells me how to a simple addition of the
individual
items in one column with another column. That is, I want to add A1 & B1;
A2
& B2, etc. Or any other math function. I have 169 data items in each
column, and need to do multiple math functions on the items, which are all
related horizontally. Excel Help is helpless as far as I can
tell--offering
no clear guidance for what seems to me a very simple programming step.
Surely there is a way. FC