Hi Joel

I have a workbook in a shared library.

Aone of my end users can browse the library and open the workbook.

I need to create a macro button in my workbook that allows my enduser to
save the workbook (saveas) to any library he wants with any name he wants....

for example:

my workbook is in library F under the name iris.xls

my end user will be able to save the document to which ever library he want
with a complitly new name: for example: library D under the name of rose.xls

I will be gratefull if you can help me with that.

thanks

iris

"Joel" wrote:

Folder = "c:\temp\"
for i = 1 to 150
thisworkbook.saveas filename:=Folder & "book" & i & ".xls"
next i

"nhollingdale" wrote:

Hi,

I am trying to create a Macro in Excel that will open a workbook and then
save it under a new name, but i would like to do this 150 times, so i will
have 150 uniquely named workbooks containing the same data. is this possible?


Thanks
Nicola