Office中国论坛/Access中国论坛

标题: 请教一个单元格数字累加的问题（急） [打印本页]

作者: crisliu 时间: 2009-2-16 00:05
标题: 请教一个单元格数字累加的问题（急）
本帖最后由 crisliu 于 2009-2-17 22:44 编辑

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

作者: crisliu 时间: 2009-2-16 00:09
大虾门帮帮忙哦
先谢过拉

作者: crisliu 时间: 2009-2-16 12:40
大家帮帮忙啊

作者: crisliu 时间: 2009-2-16 12:40
帮小弟指导下啊

作者: crisliu 时间: 2009-2-16 17:05
怎么都没人啊，晕啊

作者: wugun123 时间: 2009-2-16 21:12
提示: 作者被禁止或删除内容自动屏蔽

作者: pureshadow 时间: 2009-2-17 20:13
除非你的表里只有这一个公式，不然实在不主张用迭代。
这个问题还是代码好一点，或者干脆就多一列。

作者: crisliu 时间: 2009-2-17 22:21
我就是不会代码啊，大家能帮帮忙吗

作者: pureshadow 时间: 2009-2-18 10:48
如果数据在A1
range("a1")=range("a1")+1
每运行一次代码就累加一次

作者: olive_fy 时间: 2009-2-18 16:30
1# crisliu
你的C列好像是金额啊，是怎么算出来的？B列也是金额吗？要怎么累加？

作者: crisliu 时间: 2009-2-19 12:10
10# olive_fy

就是在B列中输入的金额，可以直接累加到C列中去

作者: crisliu 时间: 2009-2-19 12:10

1# crisliu
你的C列好像是金额啊，是怎么算出来的？B列也是金额吗？要怎么累加？
olive_fy 发表于 2009-2-18 16:30

就是在B列中输入的金额，可以直接累加到C列中去

作者: crisliu 时间: 2009-2-19 12:11

如果数据在A1
range("a1")=range("a1")+1
每运行一次代码就累加一次
pureshadow 发表于 2009-2-18 10:48

你这样似乎太麻烦了点，我是要统计表格的，没有那么多时间去运行代码

作者: pureshadow 时间: 2009-2-19 14:30
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

作者: crisliu 时间: 2009-2-20 00:44
本帖最后由 crisliu 于 2009-2-20 00:51 编辑

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 时间: 2009-2-20 09:11
If Target.Column = 2 Then改一下就可以了
我看过你的表格了，我写的代码只是提供思路。

作者: crisliu 时间: 2009-2-20 09:48

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

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

作者: crisliu 时间: 2009-2-20 09:51
不是我懒呀。我是真得不会

作者: pureshadow 时间: 2009-2-20 09:54
If Target.Column mod 3 = 2 Then

作者: crisliu 时间: 2009-2-20 10:21
能再请教个问题吗？？？如何使光标在B25回车后直接跳到E2， E26回车后跳到H2 这样能做到吗

作者: crisliu 时间: 2009-2-20 10:23
谢谢各位帮助我的朋友，小弟感激不尽！！！！！！

作者: crisliu 时间: 2009-2-20 11:14
版主不在了？
～～～～～～～～～

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)