Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]() Sub Macro1() ' Dim WS As Worksheet For Each WS In ActiveWorkbook.Worksheets WS.Copy ActiveWorkbook.SaveAs ActiveSheet.Name Next WS ' End Sub -- H.A. de Wilde ------------------------------------------------------------------------ H.A. de Wilde's Profile: http://www.excelforum.com/member.php...o&userid=30679 View this thread: http://www.excelforum.com/showthread...hreadid=538811 |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Another one
http://www.rondebruin.nl/copy6.htm -- Regards Ron de Bruin http://www.rondebruin.nl "H.A. de Wilde" wrote in message news:H.A.de.Wilde.27a5eq_1146741004.3843@excelforu m-nospam.com... Sub Macro1() ' Dim WS As Worksheet For Each WS In ActiveWorkbook.Worksheets WS.Copy ActiveWorkbook.SaveAs ActiveSheet.Name Next WS ' End Sub -- H.A. de Wilde ------------------------------------------------------------------------ H.A. de Wilde's Profile: http://www.excelforum.com/member.php...o&userid=30679 View this thread: http://www.excelforum.com/showthread...hreadid=538811 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Saving worksheets within workbooks as individual files | Excel Worksheet Functions | |||
Copying individual files (workbooks) into worksheets | Excel Programming | |||
Can I split worksheets from one workbook into individual workbooks | Excel Discussion (Misc queries) | |||
Saving Individual Worksheets | Excel Programming | |||
Change code to make worksheets instead of workbooks | Excel Programming |