"Jake Marx" wrote in message
...
Hi Bura,

Just to expand a bit...as Frank shows, there is no way to specify the
starting drive/path for the dialog. So you must actually change the
current
directory for the user, then display the form. When you do that, it's a
good idea to put things back in place when you're done. Here's an
example:

Sub ShowSaveAs()
Dim vResponse As Variant
Dim sOldPath As String

sOldPath = CurDir

ChDrive "C:"
ChDir "C:\"

vResponse = Application.GetSaveAsFilename("jake.xls", _
"Microsoft Excel Files (*.xls), *.xls")

If vResponse < False Then
MsgBox CStr(vResponse)
End If

ChDrive sOldPath
ChDir sOldPath
End Sub

As Harald noted, this does not *do* anything per se. But it will return
either False (if the user clicked Cancel) or a String representing the
full
path/filename the user selected.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com


Thank you all -- so useful!!!


[please keep replies in the newsgroup - email address unmonitored]


Bura Tino wrote:
Hi,

Is there vba for making the Save As prompt appear with a certain
active directory and a suggested file name?

Thanks,

Bura