将单元格值求和，直到空白单元格

Question

我需要excel公式将单元格值添加到空白单元格 我尝试过以下公式：

=IF(A4="",SUM(A4:INDEX(A$1:$A4,MATCH(TRUE,(A$1:$A4=""),A4))),A4)

但它显示错误的结果。

请参阅下面的图片了解，我正在寻找什么样的结果。

Answer 1

对于 A 列中的数据块，在 B2 中输入：

=IF(A2="",SUM($A$1:A2)-SUM($B$1:B1),"")

并向下复制：

B 列中的每个值都是其上方的 A - 块的总和。
使用 B 列允许我们避免在 A 列中找出放置 SUM（）公式的位置。

Answer 2

如果您希望结果在同一列上，请尝试使用此宏

Sub total()
Dim i As Long, temp As Long
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row + 1
    If Cells(i, 1) <> "" Then
        temp = temp + Cells(i, 1)
    Else
        Cells(i, 1) = temp
        temp = 0
        Cells(i, 1).Interior.Color = vbYellow
    End If
Next i
End Sub