| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Sheet to Workbook
Try this
Sub test() Application.ScreenUpdating = False For a = 1 To Sheets.Count Sheets(a).Copy ActiveWorkbook.SaveAs Sheets(1).Name ActiveWorkbook.Close Next a Application.ScreenUpdating = True End Sub -- Regards Ron de Bruin (Win XP Pro SP-1 XL2000-2003) www.rondebruin.nl "Ed" wrote in message ... How can i copy all sheets in a workbook to their own workbook with the name of the sheet as the new name of the workbook? |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Copy sheet cells into differnt workbook/sheet, How? | Excel Discussion (Misc queries) | |||
| can I make a specified sheet as startup sheet in a workbook? | Excel Discussion (Misc queries) | |||
| Link individual sheet to one sheet in another workbook | Excel Discussion (Misc queries) | |||
| Select sheet tabs in workbook & save to separate workbook files | Excel Worksheet Functions | |||
| Use Sheet CodeNames to Select Sheet in Different Workbook | Excel Discussion (Misc queries) | |||
Hybrid Mode
