excel怎么实现单元格自动累加

关键字：excel 更新时间：2018-03-06 17:42:32 223次访问

如图所示，当月累计之前是收到加完以后填写，希望可以用公式实现自动累加

'A1为输入数字后，自动累加以前数字的单元格
'借助C2、D2、E2三个单元格就能实现
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo 100
x = [a1] + 1
If Target.Address = "$A$1" Then
[e2] = "=C2+D2"
If [c2] = "" And [d2] = "" Then
[c2] = Target
ElseIf [c2] <> "" And [d2] = "" Then [d2] = Target
End If
If [a1] <> [e2] Then
[a1] = [e2]
[c2] = [e2]
[d2] = ""
End If
End If
100
End Sub

做成流水账，这样实现起来更方便一些。

excel是无法实现自动累计的：因为某一单元格的数据来源要么是手工输入的，要么是公式设置得到的！

相关标签：excel