F
Faraz A. Qureshi
I want to save a file in the 2003 version in the name of value of a cell.
What might be wrong with:
Sub SAVEAS()
ActiveWorkbook.SAVEAS "D:\New Folder\" & _
Range(Application.InputBox("SELECT", , , , , , , 8)).Text & ".xls", _
FileFormat:=xlExcel9795
End Sub
Your comments and guidance shall be appreciated.
What might be wrong with:
Sub SAVEAS()
ActiveWorkbook.SAVEAS "D:\New Folder\" & _
Range(Application.InputBox("SELECT", , , , , , , 8)).Text & ".xls", _
FileFormat:=xlExcel9795
End Sub
Your comments and guidance shall be appreciated.