title: If column contains number greater than 1, replicate that row that many times
body: <p>Ok, so I got that working, and added my code to change another column in the same loop, my final challenge is to look at my Q column, which contains the quantity of the items ordered, and IF it is > 1 THEN copy the entire row, and paste it into newly inserted rows for however many over 1 the quantity was. 
  Example</p>
  
  <pre><code>Josh   Smith  Soda    1
  John   Doe    Banana  3
  Tony   Brown  Cake    1 
  </code></pre>
  
  <p>Would need to become</p>
  
  <pre><code>Josh   Smith  Soda    1
  John   Doe    Banana  3
  John   Doe    Banana  3
  John   Doe    Banana  3
  Tony   Brown  Cake    1 
  </code></pre>
  
  <p>My code thus far is:</p>
  
  <pre><code>Sub prepLabels()
  Dim i As Long
  For i = 3 To Range("A2").End(xlDown).Row Step 1
      If Cells(i, "Q") &gt; 1 Then
          ActiveCell.EntireRow.Select
          Selection.Copy
          Selection.Insert Shift:=xlDown
      End If
  End If
  Next i
  End Sub
  </code></pre>
  
  <p>But obviously I failed at something, as my first row simply replicates 7 times or something.</p>