Need Save As Dialog Box
 

How do I get the save as dialog box to come up?

Need Save As Dialog Box
 

I think you can do:

fname = Application.Dialogs(xlDialogSaveAs).Show


"Justin Philips" wrote:

How do I get the save as dialog box to come up?

Need Save As Dialog Box
 

Application.Dialogs(xlDialogSaveAs).Show

"Justin Philips" wrote:

How do I get the save as dialog box to come up?

Need Save As Dialog Box
 

Just some added information:

fname would contain True or False based on whether the Save was successful
or not. It would not contain the name/new name of the file.

--
Regards,
Tom Ogilvy


"barnabel" wrote:

I think you can do:

fname = Application.Dialogs(xlDialogSaveAs).Show


"Justin Philips" wrote:

How do I get the save as dialog box to come up?

Need Save As Dialog Box
 

If you want more control, use
fname = Application.GetSaveAsFilename()

set the help on that function for arguments you can pass to the name.

Not that it does not perform the save. You can evaluate the user's choice
and then execute a
thisworkbook.SaveAs fName

if you agree.

--
Regards,
Tom Ogilvy


"Justin Philips" wrote:

How do I get the save as dialog box to come up?