title: Excel Copy active sheet and specified sheets to new workbook
body: <p>im trying to copy the active sheet and 2 specified sheets to a new workbook and then have the macro to continue to run on the new workbook to change a few things before i save it</p>
  
  <p>i want to copy the sheets by the sheets codenames</p>
  
  <ul>
  <li>1st Sheet 3 to copy this will be the "active sheet"</li>
  <li>2nd Sheets codename is "DropDown_Sheet_1_VB"</li>
  <li>3rd Sheets codename is "Control_Sheet_VB"</li>
  </ul>
  
  <p>Example Code.</p>
  
  <pre><code>Sub Create_Work_Order()
  
  Workbooks.Add
  
  ActiveSheet.Copy 'copy to new workbook
  DropDown_Sheet_1_VB.Copy 'also copy to new workbook
  Control_Sheet_VB.Copy 'also copy to new workbook
  
  Dim NewWB As Workbook
  
  NewWB.ActiveSheet.Range("A1").Copy 'do stuff on new workbook
  NewWB.Save
  
  End Sub
  </code></pre>