xlDialogs(xlDialogSaveAs)

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I want to suggest a name for the file being saved and test for a return. I
can't seem to do both.
This opens the dialog box and displays my suggested name:
Application.Dialogs(xlDialogSaveAs).Show strSaveAsName
[strSaveAsName contains the suggested name which changes each time the macro
runs]

This allows me to capture the return value from the dialog box:
rtrnVal = Application.Dialogs(xlDialogSaveAs).Show

This gives an error message from the compilier saying that it's looking for
the end of the statement and highlights the variable:
rtrnVal = Application.Dialogs(xlDialogSaveAs).Show strSaveAsName

Please tell me what I'm missing. Thank you very much for your help.
 
Try this

rtrnVal = Application.GetSaveAsFilename(strSaveAsName , _
fileFilter:="Excel Files (*.xls), *.xls")
 
Back
Top