I don't think you can do this
But you can use this
FName = Application.GetSaveAsFilename("yourfilename", _
fileFilter:="Excel Files (*.xls), *.xls")
See the VBA help for GetSaveAsFilename to get more information
--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl
"gerard" wrote in message ...
Hello
could you tell me how to change the default file name in
the dialog "save as" or "save" without opening the dialog
or save the file
tks in advance..... I am really stucked....