ActiveWorkbook.Close function

[Guest]

Is there a way to prefill in the "File Name:" in the Save As window when
using the ActiveWorkbook.Close function?

I want to prefill the filed with the name of the file opened with

DataFileName = Application.GetOpenFilename(filefilter:="Text or ASC Files,
*.txt; *.asc", Title:="Select the Data File")

Want the workbook name to be the same name as that opened by DataFileName
(less the .txt or .asc extension) and not "Sheet1".

Thanks

 

[News]

Just do a
WB.SaveAs NameYouWant.xls,xlWorkbookNormal
then when you close, the SaveAs dialog will not show.

NickHK

 

[Guest]

I want to still prompt them on saving but I wanted to prefill in the name of
the file into the File Name field of the Save As window.

 

[News]

Use .GetsaveAsFilename and set the first argument, InitialFilename.

NickHk

 

[Guest]

Something is not working. Where do I set this statement?

Also I want to keep the workbook open after saving the file.

 

[NickHK]

Before you wish to .SaveAs the file, the same as you are using the
GetOpenFilename before you .Open the file initially.

As for keeping the file open, don't .Close it then, although I thought was
the whole point going by your subject line.

NickHK