如何通过 VBA 仅在特定单元格内进行求和

Question

参考下图，我想遍历某一列（在本例中为 D 列），直到我点击特定的单元格（在本例中为黄色单元格）。在我的最终电子表格中，我有多个我想要定位的黄色单元格。一旦我点击了一个黄色单元格，我想开始对黄色单元格（C 列）左侧的一个单元格的值进行简单求和。我想继续对这些值求和，直到我遇到一个空白单元格，这表示集合结束。

如果您需要更多说明，请告诉我！

Answer 1

下面是一些应该可以完成工作的代码。但是，您将不得不根据自己的需要对其进行调整。

Dim Summation as Double
For Each Target in Range("D:D")
    If Target.Interior.ColorValue = 6 Then
        Summation = Summation + Target.Offset(0, -1).Value
    End If
Next Target

希望对您有所帮助。但是，不要忘记 FreeMan 关于提问和使用宏记录器的建议！

如何通过 VBA 仅在特定单元格内进行求和

How to do a summation only within specific cells via VBA

excel

vba

target