Save only one sheet from workbook

[joecrabtree]

Hi all,

I have a workbook with lots of worksheets, but as part of my macro I
want to just save the sheet named data1 as a new file. Is there any
easy way that I can do this?

Thanks in advance,

Joseph Crabtree

 

[Mike Fogleman]

Sheets("data1").Copy

Mike F

 

[Ron de Bruin]

You can use this example in 97-2007
http://www.rondebruin.nl/security.htm

 

[joecrabtree]

Hi

Thats great.

I now want to be able to save all charts in the workbook as a seperate
file. All chart sheets have the name chart1, chart2 etc. Is there
anyway of modifying the codee to do this?

Thanks

Joseph