在VBA Excel中引用公式内的一系列单元格

Question

我正在尝试使用VBA来计算一些字段。 当我记录一个宏时，我得到这个：

ActiveCell.FormulaR1C1 = "=AVERAGEIF(R4C[-27]:R4C[-6],2012,RC[-27]:RC[-6])"

问题在于公式的范围可以更改。

我有一个整数变量NumOfMon ，它从工作表的第一列开始计算公式所需的列。 但是，上面的公式使用偏移量来确定所需的范围，但是由于我的范围可以更改，因此我需要使用NumOfMon才能仅使用所需的单元格。 如何更改公式以便可以正确使用？

我尝试使用这样的变量：

a = 28
NumofMon = 21
 ActiveCell.FormulaR1C1 = "=AVERAGEIF(R4C[-(a-1)]:R4C[-(a-NumOfMon-1)],2012,RC[-(a-1)]:RC[-(a-NumOfMon-1)])"

但出现错误：“应用程序定义或对象定义错误”

Answer 1

基本上

ActiveCell.FormulaR1C1 = "=AVERAGEIF(R4C[-" & (a-1) & "]:R4C[-" & (a-NumOfMon-1) & "],2012,RC[-" & (a-1) & "]:RC[-" & (a-NumOfMon-1) & "])"

Answer 2

如果可能，将您的数据转换为表格。 这样，您可以引用动态数据（大小变化）而不会遇到问题。 例如，要引用名为“ Table1”的表中名为“ Item”的列A，您的引用将是“ = Table1 [Item]”，无论行如何。