Vba 一列的单元格与另一列的单元格相乘后的平均值

如何执行此计算（如AVERAGEPRODUCT）并使其工作？我想在将Z列的单元格与AC列的单元格相乘后计算Z列单元格的和，然后将它们与AC列的最后一个单元格相除。我很抱歉提供的数据太少，但实际上，我唯一需要的是执行下面代码行的工作方法。线路真是一团糟。对不起

照片

---

工作表函数可能如下所示：

=SUMPRODUCT(AVERAGE(A1:A3*B1:B3))

使用VBA，您可以使用类似以下内容：

Range("C1").Value = Evaluate("=Average(A1:A3*B1:B3)")

---

给你：

.Range("Z" & i).Value = Evaluate("=AVERAGE(Z2:Z" & cnt + 1 & "*AC2:AC" & cnt + 1 & ")")

---

A好的！伟大的我怎样才能使它在我的代码中使用它这样的范围呢？更清楚地说，我希望先执行乘法，然后找到这些新值的平均值我不想求平均值的和，我想找出所有单元格相乘后的平均值，这两个函数的作用正如您所解释的-

SUMPRODUCT

实际上只对一个数字求和。它可以确保

平均值

被视为一个数组公式——这意味着每个平均值都是单独计算的。我将添加另一个完全适合您的示例。@PericlesFaliagas，示例添加。

.Range("Z" & i).Value = Evaluate("=AVERAGE(Z2:Z" & cnt + 1 & "*AC2:AC" & cnt + 1 & ")")