SaveAs (Excel 2000)

[merlynsdad]

I need to have a workbook saved to the directory of the user's choice, without closing. I'm using the following code:

fname = Application.GetSaveAsFilename
ActiveWorkbook.SaveAs (filename.xls)

The file is getting saved, but not where I'm selecting in the SaveAs dialog box.

What am I doing wrong???

[HansV]

Since you store the result of GetSaveAsFilename in the variable fname, you must use that variable for the SaveAs method:

ActiveWorkbook.SaveAs fname