if Report.xls is not open in excel you can use the filecopy command.

filecopy "C:\myfolder\report.xls", "C:\Mystructure\" &
workbooks("Nemes.xls") _
.Worksheets("Sheet1").Cells(i,"B").Value & ".xls"

if it is open, then use FileSaveCopyAs

Workbooks("Report.xls").SaveCopyAs "C:\MyStructure\" & _
workbooks("Nemes.xls").Worksheets("Sheet1").Cells( i,"B").Value & ".xls"


--
Regards,
Tom Ogilvy

"Karthik Bhat - Bangalore" wrote in message
ups.com...
Hi


I have a file which is to be sent out to different recipients (at least

200). Although the file is same I need to send this to various
recipients with different file names. I have a list that is to be used
to name the files.
For example I have a file called Report.xls and have a list a, b,
c...z. (in a file Nemes.xls). I want a code that will save the file
report.xls as a.xls, b.xls.... z.xls in the specified folder/location.


I know this is possible using VBA code.
Can you helpme by giving some useful code?


Karthik Bhat
(Bangalore)