excel - 循环通过行乘以一行 VBA

Question

我在 BA40:BZ40 行中有一组权重，我希望每一行从 BA60:BZ60 到 sum (BA40*BA60 + BB40*BB60 + ... + BZ40*BZ60) 开始。然后将其粘贴到 CA60 中，然后移动到第 61 行。但是我仍然需要引用 BA40:BZ40 。我不知道是我简单的头脑变得困惑还是不可能。然而，我了解到一切皆有可能。我现在的代码是

Dim cellsum As Long
For i = 60 to 1000

所以我想计算每一天的损失加权总和。例如第 1 天， sum(0.2*(-10)+ 0.2*(-8)+ 0.1*(-6) + 0.5(-4))

Weight: 20%, 20%, 10%, 50%

Day 1: -10, -8, -6, -5
Day 2: -9, -8, -7, -6
Day 3: -5, -5, -4, -4
...

Answer 1

使用SUMPRODUCT()功能如下。它会自动计算百分比。您不需要总和为 .2 , .1

=SUMPRODUCT(BA40:BZ40,BA60:BZ60)