Hi,
I am using a VBA that I found here to sum ranges until a cell (all in one column; A) is empty.
VBA:
Sub MultipleLines()
Dim cell As Range
Dim offset_rows As Long
Set cell = ActiveCell
'or Range("A8").Select
Do While Not IsEmpty(cell.Offset(2, 0))...