title: Insert Round function into current cell using VBA
body: <p>I'm trying to make it easier to insert the Round function into a number of cells that already have formulas in them.</p>
  
  <p>For instance, if cell A1 has the formula <code>=b1+b2</code>, after the use of this macro, I want the cell contents to read  <code>=Round(b1+b2,)</code>. The formulas in each of the cells are not the same, so the <code>b1+b2</code> portion has to be anything.</p>
  
  <p>All I can get to is this:</p>
  
  <pre><code>Sub Round()
  
      Activecell.FormulaR1C1 = "=ROUND(b1+b2,)"     
  End Sub
  </code></pre>
  
  <p>So I'm really looking for some way to get the formula in a selected cell, and then edit those contents using VBA. I can't find the answer anywhere.</p>