excel vba | 更改循环中的绝对单元格

Hiyall！

如何更改循环中的公式绝对单元格？ 可以说我有链接=ref!$C$2*4 ，如何在下一行中移动1行，循环=ref!$C$3*4 ？ 我是否需要拆分它并添加计数器？ 还是有一个更简单的方法？

示例代码

 Dim cycle As Range For Each cycle In Sheets("ref").Range("A2:A4") ... Range("D2").Select ActiveCell.FormulaR1C1 = "=ref!R2C2" + "*4" Selection.AutoFill Destination:=Range("D2:D3") ... End Sub 

此外，我很好奇如何在VBA中添加math公式，如=（С4+ B4）/ LOG10（A4）+12，使用引号完全没有帮助：<

Answer 1

使用公式而不是FormulaR1C1

 Sub dural() With Range("D2") .Formula = "=(C4+B4)/LOG10(A4) + 12" .AutoFill Destination:=Range("D2:D3") End With End Sub 

注意参数将在填充中自动调整：