THanks BOB I just found away around my problem.

Bob Phillips wrote:
This line

Set rng5 = Worksheets(1).Cells(Rows.Count, 3).End(xlUp)(2)

set the range to some cells cell in column C, and then this line

rng5.Resize(1, 4).FormulaR1C1 = "=Sum(R5C:R[-1])"

create a SUM formula in that column, PLUD the next 3.

Which do you want to add it to?

Here is my code. THe problem im having is that I dont need it to sum every
column who do i make it only sum the colums i want?
[quoted text clipped - 56 lines]
Range("G3").Select
End Sub

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200610/1