如何将求和函数输出到单元格

我正在编写一个代码，该函数将新员工添加到员工列表并更新这些员工下面的所有求和函数。我在这个网站上搜索了几天，似乎无法找到任何具有相同问题的人。如何将求和函数输出到单元格

一旦员工的姓名和小时数已添加到新行中，我需要底部的小计在其总计小时数中包含新行。

我已经循环使用for ... next循环，x变化。

我得到这个输出到我的工作表。这在逻辑上是正确的，但实际上并不奏效。只是想知道我想要做什么。

= SUM（范围（单元（5，17），电池（X，17）））

最后我只是希望这样的事情在小计电池露面...... = SUM （Q5：Q18）

非常感谢！

来源

2013-06-05 FinanceMajor

你在做什么的代码在哪里？这将有助于显着。我怀疑你可以使用'Range（Cells（5,17），Cells（x，17））。Address' – enderland

试试下面的代码：

Sub sample() 

    dim x as Integer 

    For x = 5 To 17 
     Cells(x, 18) = WorksheetFunction.Sum(Range(Cells(5, 17), Cells(x, 17))) 
    Next 
End Sub

如果你想发送公式，你可以使用下面的字符串。

Sub sample() 

    dim x as Integer 

    For x = 5 To 17 
     Cells(x, 18) = "=Sum(Q5:Q" & x & ")" 
    Next 
End Sub

来源

2013-06-05 19:02:37 Santosh

Perfect！代码的第二个版本正是我所需要的！我不能投票，但显然是因为我需要15个声望才能做到这一点...... – FinanceMajor

啊。现在我拥有它。再次感谢。第一篇文章。 – FinanceMajor

如何将求和函数输出到单元格

回答

相关问题