Question

EXCEL中在A1输入1后自动在B1显示1，如果再次在A1输入2后，B1自动显示为3，即1+2的值，以此类推。

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("a1").Address Then
Range("b1") = Range("b1") + Range("a1")
End If
End Sub
这个代码是某个单元格，那么A这一列呢。？

Answer 1

这个就必须用到VBA了，代码很简单，
在当前工作表的代码框里粘贴下面代码
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("a1").Address Then
Range("b1") = Range("b1") + Range("a1")
End If
End Sub

Answer 2

循环调用！