Saves the document to a file with a new name.
Object.SaveAs ( [fileName As String] )
If the filename is omitted, QuickField provides a dialog box asks for the name and location of file.