title: How can I repeat a VBA process to make a cell reference changes?
body: <p>How can I repeat this process for up to 500 cells of data, displayed down a column?</p>
  <p>Each iteration will need to move downward in the respective columns one cell at a time in three places:</p>
  <ol>
  <li>The B2 reference will roll to B3, B4, etc. using a relative reference</li>
  <li>R[-2]C[-1] will roll to R[-1]C[-1], R[1]C[-1], etc., using a relative reference</li>
  <li>The D2 reference will roll to D3, D4, etc. using a relative reference</li>
  </ol>
  <pre class="lang-vb prettyprint-override"><code>Sub Email()
      Application.Goto Reference:=&quot;Email&quot;
      Sheets(&quot;Tickers&quot;).Select
      If Range(&quot;B2&quot;) = Empty Then
          Exit Sub
      End If
      Sheets(&quot;Moves&quot;).Select
      Range(&quot;C4&quot;).Select
      ActiveCell.FormulaR1C1 = &quot;=Tickers!R[-2]C[-1]&quot;
      Worksheets(&quot;Moves&quot;).Activate
      Application.Wait (Now + TimeValue(&quot;0:00:10&quot;))
      ActiveSheet.Range(&quot;B2:L129&quot;).Copy
      
      With Worksheets(&quot;Tickers&quot;)
          .Activate
          .Range(&quot;D2&quot;).Select
          .Pictures.Paste
      End With
  End Sub
  
  The task is to take a list of tickers (column B on &quot;Tickers&quot;, starting with cell B2), insert those tickers one by one on &quot;Moves&quot; in cell C4, and take the resulting table and copy-paste a picture of the table from Moves back into column D of &quot;Tickers&quot; (the table for the ticker in B2 would go in D2, B3 in D3, etc.).
  </code></pre>