Mine should have removed a line. It simply loops thru a LIST Sub test() For i = 1 To 12 ActiveWorkbook.SaveAs "C:\Documents and Settings\ASHISH\Desktop\ABC\book" & cells(I,”a”) & ".xlsx" Next i End Sub
A simple one I used for testing Option Explicit Sub CopyActiveWorkbookBasedOnList() For i = 1 To 2 ActiveWorkbook.SaveAs "C:\thisfolder\book" & Cells(i, 1) & ".xls" Next i ActiveWorkbook.Close End Sub From: SridharBL Sent: Tuesday, September 13, 2011 6:49 AM To: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ Macro to Copy the sheets from One file to Multiple Files Don, What the difference b/w your code and Ashish code??? Thanks Sridhar BL -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel