macro
hI jw:
I am getting an unexpected expression for the expression below it highlights
the colon and equial
(FileFilter:="Excel Files (*.xls),*.xls)")
--
thank you mac
"JW" wrote:
Sub likeThis()
Dim fName As Variant
fName = Application.GetSaveAsFilename _
(FileFilter:="Excel Files (*.xls),*.xls)")
If fName = False Then Exit Sub
On Error Resume Next
ActiveWorkbook.SaveAs fName
End Sub
mac wrote:
Hello
I am new to macros. I have created a macro that I want to use on a template
and once it is run, I want it to ask me what file name to save as. Could
someone help me with this. Any help will be greatly appreciated.
--
thank you mac
|