Prompt user for a filename

[J S]

I want to create an excel macro that display the saveas dialog box to the
user, how do I do that?

i.e. I want the user to save the current document, but when I use
thisworkbook.save or thisworkbook.saveas excel does NOT display the saveas
dialog box where the user can select the filename and directory he wants to
save to.

-J

[bhofsetz]

Use

fileSaveName = Application.GetSaveAsFilename

see VBA help for complete syntax of filters, etc...

[Edwin Tam]

You can use the GetSaveAsFilename method. An example is shown below. For more
information, you can search for the topic "GetSaveAsFilename method" in the
VBA online help.

Sub obtain_filename()
Dim fileSaveName As String
fileSaveName = Application.GetSaveAsFilename( _
InitialFileName:="MyFile", FileFilter:="Text Files (*.txt), *.txt")
If fileSaveName <> False Then
MsgBox "Save as " & fileSaveName
End If
End Sub

Regards,
Edwin Tam
[email protected]
http://www.vonixx.com





"J S" wrote:

> I want to create an excel macro that display the saveas dialog box to the
> user, how do I do that?
>
> i.e. I want the user to save the current document, but when I use
> thisworkbook.save or thisworkbook.saveas excel does NOT display the saveas
> dialog box where the user can select the filename and directory he wants to
> save to.
>
> -J
>
>
>

[Jim Thomlinson]

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

HTH

"J S" wrote:

> I want to create an excel macro that display the saveas dialog box to the
> user, how do I do that?
>
> i.e. I want the user to save the current document, but when I use
> thisworkbook.save or thisworkbook.saveas excel does NOT display the saveas
> dialog box where the user can select the filename and directory he wants to
> save to.
>
> -J
>
>
>

[Hans Petter]

Use the GetSaveAsFilename method.
From Excel Helpfile:
fileSaveName = Application.GetSaveAsFilename( _
fileFilter:="Text Files (*.txt), *.txt")
If fileSaveName <> False Then
MsgBox "Save as " & fileSaveName
End If

Then you can use the SaveAs method to save the fileSaveName

Hans Petter


"J S" <[email protected]> skrev i melding news:[email protected]...
> I want to create an excel macro that display the saveas dialog box to the
> user, how do I do that?
>
> i.e. I want the user to save the current document, but when I use
> thisworkbook.save or thisworkbook.saveas excel does NOT display the saveas
> dialog box where the user can select the filename and directory he wants
to
> save to.
>
> -J
>
>