如何在C列空白单元格计算出教研组成员工作量

河洛张红峰 · 发表于 2024-3-26 09:53

本帖最后由河洛张红峰于 2024-3-26 10:27 编辑

C:\Users\lenovo\Desktop\求助图片求助说明：

用vba计算出单元格C2、c6、c12的值，

让：

C2=c3+c4+c5

c6=c7+c8+c9+c10+c11

c12=c13+c14

slonby · 发表于 2024-3-26 09:58

大哥你要放excel附件，不然人家不懂怎么帮你，另外也没看懂要计算啥哦

半百 · 发表于 2024-3-26 10:20

swl4561255 · 发表于 2024-3-26 10:36

参考附件

Sub test()
ar = [B2].End(4).Row
MsgBox ar
For i = ar To 2 Step -1
If Cells(i, 3) <> "" Then
s = s + Cells(i, 3)
Else
Cells(i, 3) = s
s = 0
End If
Next
End Sub

复制代码

cnmlgb9998 · 发表于 2024-3-26 10:47

这种问题用PQ 很方便，即时更新。

河洛张红峰 · 发表于 2024-3-26 12:07

半百发表于 2024-3-26 10:20

太感谢了

河洛张红峰 · 发表于 2024-3-26 12:11

cnmlgb9998 发表于 2024-3-26 10:47
这种问题用PQ 很方便，即时更新。

谢谢，谢谢！

gwjkkkkk · 发表于 2024-3-26 19:24

Option Explicit
Sub TEST1()
Dim ar, i&, iPosRow&

ar = [A1].CurrentRegion.Value
For i = 2 To UBound(ar)
      If InStr(ar(i, 2), "组") Then
         iPosRow = i
      Else
         ar(iPosRow, 3) = ar(iPosRow, 3) + ar(i, 3)
      End If
Next i

[A1].CurrentRegion.Value = ar
Beep
End Sub

gwjkkkkk · 发表于 2024-3-26 19:25

参与一下。。。

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

[求助] 如何在C列空白单元格计算出教研组成员工作量

评分

评分