dynamic范围公式

我从另一个工作簿中提取了一些数据，并且希望在数据末尾对列进行总结。 问题是我想要在最后一个单元格中的总和公式，而不仅仅是值，所以如果用户在提取数据后更改数据，它将自动更新。 数据从第8行开始，长度也不相同，所以这里是我到目前为止的尝试：

ActiveCell.Range("a1").End(xlDown).Select LastRow = Activecell.Row ActiveCell.Offset(2,0).Range("a1").Select ActiveCell.FormulaR1C1 = "=sum(R[-LastRow + 6]C:R[-2]C)" 

这将返回一个错误，因为我猜你不能在这个语法中使用一个variables。 我能做什么？

Answer 1

假设你的其他代码是正确的，那么把最后一行改为：

 ActiveCell.FormulaR1C1 = "=sum(R[-" & Cstr(LastRow+6) & "]C:R[-2]C)"