ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Copy specific Sheets and save them as a workbook (https://www.excelbanter.com/excel-programming/355886-copy-specific-sheets-save-them-workbook.html)

Rock*

Copy specific Sheets and save them as a workbook
 
Is there a method that will allow me to copy specific sheets (lets say sheet1
and sheet2) from my current workbook and save them as a seperate file. The
method below lets me copy only one sheet.

ThisWorkbook.Worksheets(1).Copy
ActiveWorkbook.SaveAs "New File"

Thank you.
Diana

Ron de Bruin

Copy specific Sheets and save them as a workbook
 
Use

Sheets(Array("Sheet1", "Sheet2")).Copy


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Rock*" wrote in message ...
Is there a method that will allow me to copy specific sheets (lets say sheet1
and sheet2) from my current workbook and save them as a seperate file. The
method below lets me copy only one sheet.

ThisWorkbook.Worksheets(1).Copy
ActiveWorkbook.SaveAs "New File"

Thank you.
Diana




Rock*

Copy specific Sheets and save them as a workbook
 
Thanks. I actually tried this before I wrote my question and for some reason
didnt' work....(let me guess I mistyped something:)

Thank you again for your time and help
--
Diana


"Ron de Bruin" wrote:

Use

Sheets(Array("Sheet1", "Sheet2")).Copy


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Rock*" wrote in message ...
Is there a method that will allow me to copy specific sheets (lets say sheet1
and sheet2) from my current workbook and save them as a seperate file. The
method below lets me copy only one sheet.

ThisWorkbook.Worksheets(1).Copy
ActiveWorkbook.SaveAs "New File"

Thank you.
Diana






All times are GMT +1. The time now is 12:24 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com