Controlling SaveAs Dialog Box 2

[OzzieOwl]

Help

I am using the following code

Application.Dialogs(xlDialogSaveAs).Show

To give the user an option of where to save an excel workbook, however I need to be able to change the default filename, and if possible stop the user from changing it.

Any help greatly appreciated

 

[rmikesmith]

Hi.

I'm not exactly sure what you are trying to achieve since you say you want to give the user an option but also want to prevent the user from changing it.

To suggest a filename + location use the following form:

Application.Dialogs(xlDialogSaveAs).Show "C:\DefaultDirectory\SuggestedFilename.xls"

To suggest only a location w/o the filename, supply just the path portion of the string:

Application.Dialogs(xlDialogSaveAs).Show "C:\DefaultDirectory\"

Of course, if you present a SaveAs dialog, you give the user to opportunity to make changes.


Regards,
Mike

 

[OzzieOwl]

Thanks Mike,

The restriction was a long shot anyway.

But the prompting filename bit works perfectly.

Cheers

Ozzie

 

[votegop]

Mike:

Great post. I've got a tangential quetion if you don't mind...

I'd like to pass the value of a Word merge field to the Save As dialog box. ie: {mergefield1} becomes the recommended file name:

C:\DefaultDirectory\whateverwasinmergefield1.doc

I know that may be a doozy of a question, but thought I'd ask.

Thanks.
Jay