If thisworkbook.path = "" then
'never saved before
(Don't you hate it when the answer is in your own question!!! <bg)
Chris Gorham wrote:
Hi,
I'm trying to write some code that will allow me to do
this:
if thisworkbookalreadysaved then
activework.save
else
filesavename = Application.GetSaveAsFilename
(fileFilter:="Microsoft Excel Workbook (*.xls), *.xls")
If filesavename < False Then ActiveWorkbook.SaveAs
Filename:=filesavename, FileFormat:=xlNormal
end if
the key issue is whether the workbook has been saved in
the past and there is a directory path to it - if, so then
just save it, if not then bring up the saveas dialog box
thks...Chris
--
Dave Peterson