Popup to say item is complete or finished

[tmcrouse]

I have a code that exports to an Excel but I want the end user to choose the name of the file and where they want it and have a pop-up that says it is done.

Private Sub cmdExcel_Click()
DoCmd.OutputTo acOutputQuery, "qryResults", "ExcelWorkbook(*.xlsx)", "C:\users\" & Environ$("username") & "\Documents\qryResults.xlsx", , , , acExportQualityPrint
End Sub

[June7]

MsgBox "Export Completed"

[orange]

How do you plan on letting user choose the name??? I'd include date and time in filename no need for user to choose anything. File is already being stored in User directory.
For the completion message/popup Try

MsgBox "Export completed  " & Environ$("username"), vbOKOnly

OOops: June7 is toooo fast.

[June7]

But you gave more info I overlooked!