title: Insert formulas (range) then copy>paste values only
body: <p>I want to make a macro that copies formulas into the range <code>Q6:Q2500</code>. After the macro inserted the formulas it should copy>paste values only.</p>
  
  <pre><code>[...]
  Application.ScreenUpdating = True
  Application.Calculation = xlCalculationAutomatic
  
  Range("Q6").Formula = "=IF(INDIRECT(""A""&amp;ROW())="""","""",CONCATENATE(INDIRECT(""A""&amp;ROW()),""/"",INDIRECT(""B""&amp;ROW()),""/"",INDIRECT(""E""&amp;ROW()),""/"",INDIRECT(""P""&amp;ROW())))"
  Range("Q6").Copy
  Range("Q6:Q2500").PasteSpecial (xlPasteAll)
  Range("Q6:Q2500").PasteSpecial xlPasteValues
  
  End Sub
  </code></pre>
  
  <p>When I run this macro it inserts the formulas as intended. But when I try to paste values only I get the first value repeated till <code>Q2500</code>. I think it's because the formula update is to slow.</p>
  
  <p>I saw another thread on Stack but the answer was to convert the formula into a VBA function. I don't know how to convert this formula.</p>