You can't do that with a Msgbox; you need an Inputbox.

Retry:
Filename = Inputbox("Please enter the file name here")
if Filename<"" and Filename<"False" then
Activeworkbook.saveas "C:]FOlder1\Folder2\" & Filename & ".xls"
Else
goto Retry
Endif

"Bill Burlison" wrote in message
...
I would like to use a msgbox and ask a user to input a filename then,
when they hit ok, save the file as "C:\Folder1\Folder2\TheirInput.xls"

I would also like to test for no entry and alert then require entry
again if they don't put information in there.