B1=A1+B1工具,选项,公式,迭代计算,一次。但这种方法会出现工作表发生变化时,都会计算一次,最好的方法是用VBA的单元格事件来完成。就是当A1的值改变时,B1=B1+A1代码如下:Private Sub Worksheet_Change(ByVal Target As Range)
Dim R&
If Target.Column = 1 And Target.Count = 1 Then
R = Target.Row
Cells(R, 2) = Cells(R, 2) + Target.Value
End IfEnd Sub这个代码在A列输入时,就同一行的B