I am having trouble writing a macro that when ran it will save my file
into a network location and prompt me for the file name. The network
path will always be the same place but the file name will change.

Any help would be great.
thanks,
KO

KO,

Maybe you could incorporate the current time into the filename to make it
unique?

Rob


"turtle" wrote in message
om...
I am having trouble writing a macro that when ran it will save my file
into a network location and prompt me for the file name. The network
path will always be the same place but the file name will change.

Any help would be great.
thanks,
KO

You could use

ActiveWorkbook.saveas("c:\direcory\" & inputbox("File Name ?"))

This will just pop up a simple box to type in your file name and will
save it to the c drive in the folder you choose.



"Rob van Gelder" wrote in message ...
KO,

Maybe you could incorporate the current time into the filename to make it
unique?

Rob


"turtle" wrote in message
om...
I am having trouble writing a macro that when ran it will save my file
into a network location and prompt me for the file name. The network
path will always be the same place but the file name will change.

Any help would be great.
thanks,
KO

Dim sFile As String
sFile$ = Application.GetSaveAsFilename()
If sFile = False Then
Exit Sub
End If
If InStr(1, sFile, ".xls") = 0 Then
sFile = sFile & ".xls"
End If
ActiveWorkbook.SaveAs (sFile)


---
Message posted from http://www.ExcelForum.com/