请教一个单元格数字累加的问题（急）

crisliu

向各位大虾门请教下， 我自己弄了个表格（在下面的附件里）。我想在B列中输入的数字会累加到C列中。比如我在B2中输入数字后会累加到C2中。 我是 初学，不懂得怎么用代码，能帮小弟解决下吗？？？     万分感谢！！！！！！！！！！！

crisliu

版主不在了？
～～～～～～～～～

crisliu

谢谢各位帮助我的朋友，  小弟感激不尽！！！！！！

crisliu

能再请教个问题吗？？？    如何使光标在B25回车后直接跳到E2，  E26回车后跳到H2    这样能做到吗

pureshadow

If Target.Column mod 3 = 2 Then

crisliu

不是我懒呀。 我是真得不会

crisliu

If Target.Column = 2 Then改一下就可以了
我看过你的表格了，我写的代码只是提供思路。
pureshadow 发表于 2009-2-20 09:11

谢谢你啊， 我代码一点都不会呀，能帮下吗

pureshadow

If Target.Column = 2 Then改一下就可以了
我看过你的表格了，我写的代码只是提供思路。

crisliu

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 Then
    Cells(Target.Row, Target.Column + 1) = Target + Cells(Target.Row, Target.Column + 1)
End If
End Sub
pureshadow 发表于 2009-2-19 14:30

谢谢你的帮忙，但是你提供的只有B列累加到C列的，其他的就不行了， 你应该没看我的表格是吗？  我的表格还有E列累加到F列，H列累加到I列，K列累加到I列，再帮我下好吗？？？

pureshadow

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 Then
    Cells(Target.Row, Target.Column + 1) = Target + Cells(Target.Row, Target.Column + 1)
End If
End Sub