I have to export excel statements that open as a Read-Only file, then save them with the name in cell A1 to a specific folder... I am getting closer I think, but when I try to run the macro the file does not save.... what have I done wrong?? I am using Excel 2010 and want to save to Excel Workbook or Excel 97-2003 Workbook
Here is my code....
Sub SaveAS()
'
' SaveAs Macro
'
' Keyboard Shortcut: Ctrl+a
'
ChDrive "H:"
ChDir "\\mspm1bnas04\westc4"
fullFileName = Application.GetSaveAsFilename(Range("A1"))
If Filename <> False Then
ActiveWorkbook.SaveAS " & fileName"
End If
End Sub
Thank you!!
Bookmarks