View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
L. Howard L. Howard is offline
external usenet poster
 
Posts: 852
Default Sum a variable length column

What little tidbit am I overlooking here.
rangeC selects the correct range.
rSum is the correct cell (First empty cell below the last entry in col C)

Returns #NAME error
Also tried this but does not compile rSum.Formula = "=Sum("C2:C" & lr)"

Thanks,
Howard

Option Explicit

Sub summerup()
Dim rangeC As Range
Dim rSum As Range
Dim lr As Long

lr = Cells(Rows.Count, 3).End(xlUp).Row
Set rangeC = Range("C2:C" & lr)

Set rSum = Range("C" & lr + 1)
'rangeC.Select
rSum.Formula = "=Sum(rangeC)"
End Sub