Give this a try...

Application.Dialogs(xlDialogSaveAs).Show "U:\FolderOne\FolderTwo\Folder3\"

--
HTH...

Jim Thomlinson


"SteveC" wrote:

ActiveWorkbook.SaveAs Filename:= _
"U:\FolderOne\FolderTwo\Folder3\", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

Hi,

How do I change the above so it opens the save as dialog box to Folder3, but
allows the user to change the location and use any name to save?

the above version doesn't work because there is no workbook name after
folder3...

thanks a lot....

SteveC