Range("I1").End(xlDown).Offset(1, 0).Value = "=SUM(I1:I" & _
Range("I1").End(xlDown).Row & ")"
HTH
Die_Another_Day
Paulg wrote:
I posted previoulsy that I needed to select the cell below a column of
numbers in order to calculate a sum. I have that.
range("I1").End(xlDown).Offset(1, 0).Select 'Next Blank Cell in column
i
I need coding to add to this line which will allow me to calculate the
sum of the column. I need the coding to account for spreadsheets with
different numbers of rows.
Thanks
Paul
--
Paulg
------------------------------------------------------------------------
Paulg's Profile: http://www.excelforum.com/member.php...o&userid=36077
View this thread: http://www.excelforum.com/showthread...hreadid=562156