two possibilities...
1)
Sub SaveFileAs()
Dim sFileName As String
sFileName = Application.GetSaveAsFilename
If sFileName = "False" Then Exit Sub
ActiveWorkbook.SaveAs sFileName
End Sub
2)
Sub SaveFileAs()
Dim sFileName As String
sFileName = InputBox("Enter Name to be saved as...")
If sFileName = "" Then Exit Sub
ActiveWorkbook.SaveAs sFileName
End Sub
just a couple of ideas
you could also add
ActiveWorkbook.Close False
before the End Dub to close the file after saving it.
Patrick Molloy
Microsoft Excel MVP
-----Original Message-----
I'm trying to save a file with a macro. I have 90
different files that
I'm running the same macro on. When it's done I want
the macro to save
it but with a different name.
Right now the code is setting the name of the file to
the first name I
put in (e.g. CMAC301). I want the next file to be named
CMAC302. How
do I do that?
When I had Office 97, I was able to somehow pause the
macro, input data
as I needed and then resume. Is this still available?
HELP!!!!!!!!!!!!!!!!!!!!!!
------------------------------------------------
Message posted from the Excel Tip Forum at
http://www.ExcelTip.com/forum/
-- View and post usenet messages directly from
http://www.ExcelTip.com
-- Hundreds of free MS Excel tips, tricks and solutions
------------------------------------------------
.