Excel VBA：取两列的总和（一直向下）并插入新列？

Question

示例我希望 VBA 代码采用单元格“A1”和“B1”并将这两个单元格在“C1”中相加，

因此，它需要使用 A2、A3、A4... 一直到列的末尾并将其汇总到 C 列。

任何人都可以帮助编写类似的程序吗？

Answer 1

我相信您可以通过搜索轻松找到答案，但这里有一段代码可能对您有帮助：

Sub SumColumns()

Dim Nb_Rows As Integer

'Nb_Rows can be any integer
For i = 1 To Nb_Rows
    Range("C" & i).Value = Range("A" & i).Value + Range("B" & i).Value
Next i

End Sub

它计算 Ai + Bi 的值并将其放入 Ci。您可以选择 的值Nb_Rows：如果您确切知道要计算的行数，则可以指定确切的值，否则只需选择一个较大的数字，以确保它贯穿整个工作表。