循环相对参考

Question

我正在尝试循环一个相对引用
我在CG9中有一个日期引用到日期列的第一个单元格
然后它会执行一些操作，我希望CG9将其引用更改为第二行中的日期。

在每次循环变化之间，我都会做一些操作。

Sub Macro7()
Dim i As Long
For i = -2 To 3451
Range("CG9").FormulaR1C1 = "=R[-i]C[-24]"
'#operations
Next i

End Sub

Answer 1

试试这个：

Sub Macro7()
Dim i As Long
For i = -2 To 3451
Range("CG9").FormulaR1C1 = "=R[-" & i & "]C[-24]"
Next i
End Sub