[ÇÖZÜLDÜ] Döngü Function

[Yakut]

slm

Range("D1")=WorksheetFunction.Sum(Range("A1:C1"))
Range("D2")=WorksheetFunction.Sum(Range("A2:C2"))
Range("D3")=WorksheetFunction.Sum(Range("A3:C3"))
......

......
......

bu fuctionu nasil döngü haline getirebilirim.

 

[Orion1]

For i = 1 To 3
    Range("D" & i).Value = WorksheetFunction.Sum(Range("A" & i & ":C" & i))
Next i

 

[Yakut]

tesekkürler