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 |