title: Copy worksheets after a specific worksheet
body: <p>I have a workbook that has a dynamic number of worksheets within it. The relevant worksheets I want to extract always occur after the worksheet "Sheet 3". The problem is the relevant worksheets have dynamic names e.g. "Apple-A", "Orange-1", etc. and I wanted to create a code that will always copy every sheet after "Sheet 3" regardless of their naming convention.</p>
  
  <p>To this point I have only been able to copy sheets when specifically calling its name e.g. </p>
  
  <pre><code>total = Workbooks("Fruits.xlsm").Worksheets.Count
  Workbooks("Fruits").Worksheets("Apple-A").Copy_after:=Workbooks("Fruits.xlsm").Worksheets(total)
  </code></pre>
  
  <p>Is there a method for copying a number of sheets to a new workbook after a certain worksheet name is called?</p>