excel vba |ループ内の絶対セルを変更する

Question

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 

はまた、私は全く役に立ちませんでした引用符を使用して、=（С4+ B4）/ LOG10（A4）+ 12のようにVBAで数学の数式を追加する方法好奇心：<

を

Answer 1

使用式ではなく、FormulaR1C1

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

引数はフィル・ダウンで自動調整します注：