[已解决]求帮忙数据自动累计

wgha8 · 发表于 2012-9-13 19:29

无比感激，请大家尽情发挥。并求详情

最佳答案

月排行榜 / 总排行榜

zjdh

2012-9-13 19:52

某月费用.rar (10.7 KB, 下载次数: 55)

wgha8 · 发表于 2012-9-13 19:31

bbhiox · 发表于 2012-9-13 19:41

学习学习

zjdh · 发表于 2012-9-13 19:43

用VBA可以做到，不过你的思路不可取，一旦输错了也累计了，前一个累计数也丢失了，反悔就比较讨厌？

zjdh · 发表于 2012-9-13 19:52

某月费用.rar (10.7 KB, 下载次数: 55)

wgha8 · 发表于 2012-9-13 20:32

zjdh：
你好，怎样做到的，可以教我吗。无比感激

yanyongxia · 发表于 2012-9-13 21:17

按alt+f11查看代码是这样的：
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Range("B5:B25"), Target) Is Nothing Then Exit Sub
If Target <> "" Then Target.Offset(0, 3) = Target + Target.Offset(0, 3)
End Sub

雨涨南塘 · 发表于 2012-9-24 15:52

学习学习

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