| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro for worksheet to workbook
Can someone help me with a macro? I am looking for
something that will take each of my worksheets and copy them to their each individual workbook? TIA |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Macro for worksheet to workbook
Try this Brian
Sub test() Application.ScreenUpdating = False For a = 1 To Worksheets.Count Sheets(a).Copy ActiveWorkbook.SaveAs Sheets(1).Name ActiveWorkbook.Close False Next a Application.ScreenUpdating = True End Sub -- Regards Ron de Bruin (Win XP Pro SP-1 XL2000-2003) www.rondebruin.nl "Brian" wrote in message ... Can someone help me with a macro? I am looking for something that will take each of my worksheets and copy them to their each individual workbook? TIA |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Macro for worksheet to workbook
Thanks Ron!
-----Original Message----- Try this Brian Sub test() Application.ScreenUpdating = False For a = 1 To Worksheets.Count Sheets(a).Copy ActiveWorkbook.SaveAs Sheets(1).Name ActiveWorkbook.Close False Next a Application.ScreenUpdating = True End Sub -- Regards Ron de Bruin (Win XP Pro SP-1 XL2000-2003) www.rondebruin.nl "Brian" wrote in message ... Can someone help me with a macro? I am looking for something that will take each of my worksheets and copy them to their each individual workbook? TIA . |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Macro to copy active worksheet to new workbook | Excel Discussion (Misc queries) | |||
| Macro for Copying Worksheet to New Workbook | Excel Discussion (Misc queries) | |||
| Macro add worksheet to workbook automatically | Excel Discussion (Misc queries) | |||
| [Fwd: Run macro on exit worksheet/workbook] | Excel Discussion (Misc queries) | |||
| Run macro on exit worksheet/workbook | Excel Worksheet Functions | |||
Hybrid Mode
