| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Worksheet saved out as new workbook
I have a workbook which contains about 15 worksheets. I update the data for
the workbook and now need to save the individual sheets as separate workbooks using the sheet names as the file name. How do I loop through each worksheet and save them as separate workbooks using the sheet 'tab' names as the file names? Sub SaveSheet() ActiveSheet.Copy ActiveWorkbook.SaveAs "C:\Data\AMReports\" & ActiveSheet.Name & ".xls" ActiveWorkbook.Close SaveChanges:=False End Sub Thanks - -TB- - |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Check Worksheet When Workbook Is Saved | Excel Programming | |||
| Save column J of WorkBook when WorkBook is not saved. | Excel Programming | |||
| can I hyperlink to a worksheet tab in workbook saved as html? | Excel Discussion (Misc queries) | |||
| How can I see a copy of a saved workbook before I saved it again? | Excel Worksheet Functions | |||
| When saving workbook only the first worksheet gets saved. | Excel Worksheet Functions | |||
Threaded Mode
