Save Selected Worksheets into a New Workbook

[Kesey]

I have a workbook which contains numerous sheets. I want the user to be able to click a command button which will save predefined worksheets as a new workbook.

For example, I have a workbook containing the following worksheets:

Sheet1
Sheet2
Sheet3
Sheet4
Sheet5
Sheet6

I want be able to click a command button which will save (export) Sheet2, Sheet3, and Sheet4 into 1 workbook (leaving the workbook with the command button untouched).

Thanks in advance for any tips or code snippets.

 

[Norie]

This will create the workbook.

Worksheets(Array("Sheet2", "Sheet3", "Sheet4")).Copy

 

[Kesey]

Exactly what I needed. Thanks!