How to open Save-as window using macros

[springy2003]

Any tips?

Thanks.

 

[springy2003]

In excel. Forgot to write the software.

 

[ChrisHirst]

VBA
Sub SomeName()
Dim fName As String

Do
fName = Application.GetSaveAsFilename
Loop Until fName <> &quot;&quot;
end sub
the above opens the SaveAs dialog and waits until the user puts in the filename, You may have to check for and add a file extension This does not save the file.

Macro
Sub SomeName()
ActiveWorkbook.SaveAs Filename:=&quot;filename&quot;, FileFormat:=xlNormal, Password:=&quot;&quot;, WriteResPassword:=&quot;&quot;, ReadOnlyRecommended:=False, CreateBackup:=False
end sub
filename can be replaced by a variable or cell value


Chris.

Indifference will be the downfall of mankind, but who cares?

 

[DanielFang]

Macro
Sub SomeName()
'
' FileSaveAs Macro
'
Dialogs(wdDialogFileSaveAs).Show

End Sub

It can word, can't it ?

 

[springy2003]

Thanks so much, ChrisHirst and DanielFang.
Springy