Question

我对Excel VBA相对较新，这就是为什么我有一些问题。我建立了一个{Posson-）矩阵，其范围为"EB5:EV25"，其中每个单元格都包含一个公式，该公式基本上（不仅是）将两个输入值相乘，例如他们看起来像

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

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

结果显示在"EB33:ED33"中，其中三个单元格中的每个单元格都对上述矩阵的特定部分求和。

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

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

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

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

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

0 个答案: