vba - Excel 2007使用VBA编写公式合并单元格

Question

我有一个从 G11 开始并向下延伸可变长度 G 列的值列表。我有一个字符串数组，其中包含要平均的 G 列数据范围的地址。在从 H11 开始的 H 列中，我合并了希望显示平均值的单元格。要一起平均的 G 柱细胞的数量也各不相同。我尝试的以下代码失败了，因为公式是按原样输入的，而不是将 range(i) 数组值放入公式中。

For i = 0 To range_num
    ActiveCell.Formula = "=AVERAGE(ranges(i))"
Next i

ranges() 包含要平均的范围(字符串形式)。例如:

范围(i) = "G11:G15"

fori = 0 和 range_num 是将要完成的平均次数。

每个 G 列值仅包含在 1 个平均值中，要求平均值的每组值是连续的，并且每组直接位于我希望平均值出现的合并单元格的左侧。有谁知道如何更好地格式化我的代码来实现这一目标？任何想法都表示赞赏，谢谢。

Answer 1

公式“按原样”输入的原因是您需要将其连接到字符串中。

For i = 0 To range_num
    ActiveCell.Formula = "=AVERAGE(" & ranges(i) & ")"
Next i