Open Save As Dialog in Code

  • Thread starter Thread starter Larry R Harrison Jr
  • Start date Start date
L

Larry R Harrison Jr

I have Excel 2003. I am trying to get code which will prompt the user to
save the currently open file as a tab-delimited file and give them the
option to name it.

Either that, or I want it to assign the current date and "warr" at the end
of it as the file name. Either way, it MUST be a tab-delimited txt file.

Tips?

LRH
 
Hi Larry,

Try this

filesavename = Application.GetSaveAsFilename( _
fileFilter:="Text Tab Delimited (*.txt), *.txt")
If filesavename <> False Then
ActiveWorkbook.SaveAs Filename:=filesavename
End If


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
Back
Top