在公式的一部分中使用变量

Question

我有变量确定我要选择的单元格范围，我想在引用变量的末尾添加一个公式：

Dim first As Integer
Dim Last As Integer


first = (ActiveCell.Row + 1)
Selection.End(xlDown).Select
Last = (ActiveCell.Row - 1)
Range("J" & first & ":J" & Last).Select

公式应该表示类似的内容。

ActiveCells.formula(r1c1) = "=RC(first -1)"

Answer 1

您可以直接传递公式：

Range("J" & first & ":J" & Last).Formula = "=your_formula"

这将在整个范围内添加您的公式 希望这会有所帮助。