title: Macro to copy paste range
body: <pre><code>Sub CPRow()
  
  Range("D14:K14").Select
  Selection.Copy
  Range("D15").Select
  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
      :=False, Transpose:=False
   End Sub
  </code></pre>
  
  <p>i want to add code to do the following:</p>
  
  <p>1- if the sheet name begins with a number then copy the range (D14:K14) and paste it in Range (D15:K15) as Values.</p>
  
  <p>2- Go to next sheet and do the same, and stop when there is a sheet with no number or until sheet name starts with a letter.</p>
  
  <p>Any help is appreciated.</p>