Try this

Sub Test()
Dim Filename As Variant
Dim Wb As Workbook
Set Wb = ActiveWorkbook

Filename = Array("workbook1.xls", "workbook2.xls", "workbook3.xls", "workbook4.xls")

For N = LBound(Filename) To UBound(Filename)
Wb.SaveCopyAs "C:\Data\" & Filename(N)
Next
End Sub

Add your file names in the array Filename
It save the files in C:\Data\


--
Regards Ron De Bruin
http://www.rondebruin.nl



"Aziz Ahmedabadwala" <AzizAhmedabadwala@discussions.microsoft.com> wrote in message
news:9BE4A03B-C917-4563-AA1C-106EF40E2D26@microsoft.com...
> RON / KEVIN,
>
> The solution given by both of you is good but it wouldnt work out in my case
> as there are too many files involved and i dont really want to make another
> tabs.
>
> is it possible that we give the file names in the macro code itself..... so
> that we dont really have to make any new files or new sheets.....
>
> so there are 12-13 diff names which could ideally be given so if we write
> all these names somewhere in the code it would be good for me....
>
> Thanks a lot.... I know i didnt explain my self properly last time around.....
>
> Aziz
>
>
> "Ron de Bruin" wrote:
>
>> Why not use GetSaveAsFilename
>> See alo the VBA help
>>
>> This example will save a copy of the activeworkbook
>> You can test fname for your criteria
>>
>> Sub Test()
>> Dim fname As Variant
>> Dim Wb As Workbook
>> Set Wb = ActiveWorkbook
>>
>> Again:
>> fname = Application.GetSaveAsFilename("", _
>> fileFilter:="Excel Files (*.xls), *.xls")
>> 'On Error Resume Next
>> If fname = False Then Exit Sub
>> If Dir(fname) <> "" Then GoTo Again
>> Wb.SaveCopyAs fname
>> End Sub
>>
>> --
>> Regards Ron De Bruin
>> http://www.rondebruin.nl
>>
>>
>>
>> "Aziz Ahmedabadwala" <AzizAhmedabadwala@discussions.microsoft.com> wrote in message
>> news:073B506F-1A6B-4A62-870A-EB39BAA210D8@microsoft.com...
>> >I have a macro in which I use a input box which enables user to input the
>> > file name and saves the file.
>> >
>> > Can i restrict the Input box so that the user can put in only specific names.
>> >
>> > Aziz
>>
>>
>>