SaveAs Dialog box
Daniel,
If you have xl2002 or xl2003 then you can use the FileDialog object to
have the user specify a folder path...
Application.FileDialog(msoFileDialogFolderPicker). Show
Otherwise, the following will display the suggested file name, but will not
prevent the user from changing the name.
'-----------------------------------------
Sub TestSaveAs()
Dim x As Variant
x = Application.Dialogs(xlDialogSaveAs).Show(arg1:="My File Name.xls")
If x = False Then
MsgBox "Cancel was clicked "
End If
End Sub
'--------------------------------------------
Regards,
Jim Cone
San Francisco, USA
"Daniel Bonallack" wrote in message
...
I want to direct the user to save the file as a certain name, but the user
should to be able to browse the directory and choose where to save it.
For example, I want the user to have to save the file as "XYZ.xls". Can
someone provide the code that allows freedom on the save path, but not on the
file name?
Thanks in advance
Daniel Bonallack
|