VBA Excel，公式引用了另一个具有可变地址的单元格
VBA Excel, formula referencing another cell with variable address
我需要在一个单元格中插入一个简单的公式，该单元格引用了插入公式的单元格下方的 2 个单元格。因为我将在许多不同的地方插入这个公式，所以“下面的 2 个单元格”地址总是在变化。
例如，在单元格 AB200 中，我想插入一个公式 =sum(AB202 * TextBox3.Value)，TextBox3.Value 是先前在宏中输入的文本框字段的值。
然后将重复该过程，但使用不同的地址和不同的文本变量。
我对循环没有问题，所以我只需要 VBA 代码来：
- 根据LastRow.Offset(16, 1)写出公式。位置。
- 对输入公式的单元格下方 2 个单元格的地址进行编码，
- 用文本变量的乘法完成公式。
引用包含公式的行下方 2 行的单元格的代码：
Activecell.FormulaR1C1="=R[2]C"
Read about R1C1 reference style 如果你不熟悉的话。
对于问题 3)，添加如下内容：
Activecell.FormulaR1C1="=R[2]C*" & YourTextVariable
希望您的文本变量中确实有一个数字，否则您将尝试将数字与文本相乘，这显然是行不通的。
至于你的问题编号 1)，我不知道你在这里的意思。 :)
也许是这样？:
cells(Activecell.specialcells(xllastcell).Offset(16, 1).row,Activecell.column).FormulaR1C1="=R[2]C*" & YourTextVariable
如果这不是你的意思，你可以google "last cell VBA"，或者如果你真的很懒，在这里说明一下，以便我们回答。
我需要在一个单元格中插入一个简单的公式，该单元格引用了插入公式的单元格下方的 2 个单元格。因为我将在许多不同的地方插入这个公式，所以“下面的 2 个单元格”地址总是在变化。
例如，在单元格 AB200 中，我想插入一个公式 =sum(AB202 * TextBox3.Value)，TextBox3.Value 是先前在宏中输入的文本框字段的值。
然后将重复该过程，但使用不同的地址和不同的文本变量。
我对循环没有问题，所以我只需要 VBA 代码来：
- 根据LastRow.Offset(16, 1)写出公式。位置。
- 对输入公式的单元格下方 2 个单元格的地址进行编码，
- 用文本变量的乘法完成公式。
引用包含公式的行下方 2 行的单元格的代码：
Activecell.FormulaR1C1="=R[2]C"
Read about R1C1 reference style 如果你不熟悉的话。
对于问题 3)，添加如下内容：
Activecell.FormulaR1C1="=R[2]C*" & YourTextVariable
希望您的文本变量中确实有一个数字，否则您将尝试将数字与文本相乘，这显然是行不通的。
至于你的问题编号 1)，我不知道你在这里的意思。 :) 也许是这样？:
cells(Activecell.specialcells(xllastcell).Offset(16, 1).row,Activecell.column).FormulaR1C1="=R[2]C*" & YourTextVariable
如果这不是你的意思，你可以google "last cell VBA"，或者如果你真的很懒，在这里说明一下，以便我们回答。