时间戳

首页 > 解决方案 > 如何使用一个公式（Excel VBA）根据各种输入值计算各种结果

excel - 如何使用一个公式（Excel VBA）根据各种输入值计算各种结果

问题描述

我对 Excel VBA 比较陌生，这就是我遇到一些问题的原因。我构造了一个（泊松）矩阵，"EB5:EV25"其中每个单元格包含一个公式，该公式基本上（不仅）将两个输入值相乘，例如它们看起来像

=POISSON(0;$H$2;FALSE)*POISSON(0;$H$2;FALSE)

其中"$H$2"和"$H$2"是我的前两个输入值。

结果显示在"EB33:ED33"三个单元格中的每个单元格中，上面矩阵的某个部分的总和被求和。

假设具有输入值之一的列是 H，而具有其他输入值的列是 K（这些值在每 82 行中）。因此，对于每列 H 和 K 的第 82 行，我的矩阵 in"EB5:EV25"计算结果并将它们呈现在"EB33:ED33". 到目前为止，此解决方案仅允许一次显示一对输入变量的结果 - 我需要手动更改矩阵中的输入变量行。但是，我最终不想将我的结果显示在"EB33:ED33"不同的列中，例如"BA:BC"在包含输入值的行之后的 2 行（分别针对输入值的每一行）。

我已经尝试了一些代码，但我什至无法使用不同列中的输入变量，我的代码也没有改变输入值 - 对于每一行输入值，结果总是相同的（我没有改变）。

Dim i As Integer
Dim rng As Range
Set rng = Range("EB5:EV25")

For i = 3 To Cells(Rows.Count, 8).End(xlUp).Row Step 82
    rng.Replace "$" & i - 1, "$" & i
    Application.Calculate
    Range("EB33:ED33").Copy
        Cells(i + 1, 63).PasteSpecial xlValues
Next i

Set rng = Nothing
End Sub

如果有人能够提供帮助，那就太好了！

标签： excelvbavariablesexcel-formulapoisson

解决方案

推荐阅读