求助实际应用问题！请帮忙……，在线等

zxcweb · 发表于 2011-3-20 13:39

怎么把本周数字自动加到累计进展里面？

wydqh · 发表于 2011-3-20 13:46

哪些区域是“本周数字”，累计又放在哪里？

zxcweb · 发表于 2011-3-20 13:52

本周数字就是“本周进展”下面的内容，比如说本周结扎3，输入后“专项治理累计进展”下面的结扎再原有3的基础上增加为6，其他的类似

xxxasdf · 发表于 2011-3-20 13:55

只有通过VBA实现了

lrlxxqxa · 发表于 2011-3-20 13:55

A列应该是有单位编码的吧?可根据唯一编码汇总本周进展,但此表实际填写格式不是这样的吧?这看起来是汇总格式.

zxcweb · 发表于 2011-3-20 14:10

其实这个就是每周一汇总，每一周的数据是不一样的，但是汇总的数据是一直累加啊！各位帮帮忙啊！

xxxasdf · 发表于 2011-3-20 14:11

Sub Worksheet_SelectionChange(ByVal Target As Range)
n = Target.Row: m = Target.Column
If m > 15 And Len(Target) > 0 And n < 21 Then
      If m <> 20 Then
         Target.Offset(0, -7) = Target.Offset(0, -7) + Target
      Else
         Target.Offset(0, -5) = Target.Offset(0, -5) + Target
      End If
Else
      Exit Sub
End If
End Sub

xxxasdf · 发表于 2011-3-20 14:13

打开sheet1VBE窗口将代码粘贴进去

zxcweb · 发表于 2011-3-20 14:18

好的，我试试，谢谢啊！

zxcweb · 发表于 2011-3-20 14:25

是可以实现，但是有些麻烦，能不能设置个按钮呢！把本周数据输入完成之后，点击按钮全部更新呢？

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

[求助] 求助实际应用问题！请帮忙……，在线等