A列输入数字后，B列原有数字自动相加A列

waaoo · 发表于 2012-3-10 11:58

如题，在A列加入数字后，B列原有数字自动相加A列的数字。并自动求和。

839262551 · 发表于 2012-3-10 12:10

貌似会涉及到循环引用的问题，建议加个辅助列

guzhen9315 · 发表于 2012-3-10 12:11

可用VBA解决。

lionman64 · 发表于 2012-3-10 12:30

本帖最后由 lionman64 于 2012-3-10 12:33 编辑

Private Sub Worksheet_Change(ByVal Target As Range)
m = Target.Column
If Target.Column = 1 Then
s = Target
n = Target.Offset(, 1)
Target.Offset(, 1) = n +s
End If
End Sub

用上述VBA程序可以实现。

lionman64 · 发表于 2012-3-10 12:35

本帖最后由 lionman64 于 2012-3-10 12:45 编辑

Private Sub Worksheet_Change(ByVal Target As Range)
m = Target.Column
If Target.Column = 1 Then
s = Target
n = Target.Offset(, 1)
Target.Offset(, 1) = n +s
End If
End Sub

用上述VBA程序可以实现。这只是基本思路，其间可能会涉及A列单元格数据类型与B列不匹配的问题，需进一步完善代码。

waaoo · 发表于 2012-3-10 15:15

还有其他更简单的办法吗？

waaoo · 发表于 2012-3-10 15:35

这样太复杂了，给个更简单的办法。

lionman64 · 发表于 2012-3-10 16:17

waaoo 发表于 2012-3-10 15:35
这样太复杂了，给个更简单的办法。

不用VBA就加辅助列吧。

		自动登录	找回密码
密码			免费注册