在Excel工作表中,如:在A1单元格里输入数据(A1单元格的数据是经常改变),A2单元格里数据自动累加

Question

如题所述

Answer 1

公式做不出这种效果
VBA
需要 [A1]双击输入 更改值
原理 在B1里 记录累计过程
为了避免看到B1值 可以设置成白色字体 或者把累计值改到不显眼地方 比如[a65000]
调整过程可以自己手动给代码
在 thisworkbookli里
加入以下代码

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address = "$A$1" Then [B1] = [A2]
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then [A2] = [A1] + [B1]
End Sub

#########切忌 更改[A1]使用双击方法才有效###########
以上回答你满意么？追问

我都看不懂这个的意思 我还是不知道怎么设置