Столбец суммы VBA с переменным количеством строк

Question

У меня есть столбец, который мне нужен для суммирования и сохранения суммы в виде переменной. Я посмотрел на этом сайте и в Интернете и попытался адаптировать свой синтаксис так, как я считаю, он должен работать, но все же безуспешно.

Мне было интересно, если кто-то сможет указать, где я иду не так.

Dim RowCount As Integer
Dim Total_TIV As Long

With Sheets("Input")
    RowCount = WorksheetFunction.CountA(Range("C18", Range("C18").End(xlDown)))
End With

With Sheets("Input")
    Total = WorksheetFunction.Sum("S18" & ":S" & 18 + RowCount)
End With

Answer 1

просто верните строку в нижней части диапазона.

Вам нужен только один с блоком.

Вам нужно добавить диапазоны с ., чтобы указать, что он принадлежит родительскому элементу..

Для SUM требуется объект диапазона, а не строка.

Dim RowCount As Long
Dim Total As Double

With Sheets("Input")
    RowCount = .Range("C18").End(xlDown).Row
    Total = WorksheetFunction.Sum(.Range("S18:S" & RowCount))
End With

Answer 2

SUM () нужен диапазон (точно так же как CountA()) :

  Total = WorksheetFunction.Sum(Range("S18" & ":S" & (18 + RowCount)))