Using a Built-In Excel Dialog:   Return to List

Application.Dialogs(xlDialogSaveAs).Show



Note to Webmaster