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

Reply via email to