title: Algorithm that makes the sum of three lines excel-vba
body: <p>I need an algorithm  that makes sum of  three cells and put it in the third cell, and repeats the same thing for the rest of the line.</p>
  
  <p><a href="https://i.stack.imgur.com/KfnKC.png" rel="nofollow noreferrer">The table i want to have algorithm  with code  vba</a></p>
  
  <pre><code>With ws    
      i = .Range("AC9").End(xlDown).Row
      cumul = 0
  
      .Range("AF9").Value = Application.WorksheetFunction.Sum(.Range("AC9:AC" &amp; i))    
  End With
  </code></pre>