excel vba |在循环中改变绝对单元格

Question

Hiyall！

如何在循环中更改公式绝对单元格？ 假设我有链接=ref!$C$2*4，如何在循环=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中添加数学公式，如=（С4+ B4）/ LOG10（A4）+ 12，使用引号完全没有帮助：＆lt;

Answer 1

使用 公式 而不是 FormulaR1C1

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

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