Save As not working in 2010 but worked in 2003

**mkremeier** · 01-04-2012, 01:30 AM

I have an estimate form created in Excel. I want to streamline the save as process so that it is easy for my user. It worked fine in 2007 but doesnot work in 2010. PLease help

Code in 2007:

Sub cmdSaveNClose()
ThisWorkbook.SaveAs Range(B47) & Range(C15)
ThisWorkbook.PrintOut
ThisWorkbook.Close
End Sub

where B47 is the save as path and C15 is the save as file name. Works great in 2007. Nothing in 2010.

Please Help!

**JieJenn** · 01-04-2012, 01:37 AM

You need to define your file format

Sub cmdSaveNClose()
ThisWorkbook.SaveAs Filename:=ActiveWorkbook.Path & "\Test.xlsm", FileFormat:=52

ThisWorkbook.PrintOut
ThisWorkbook.Close
End Sub

**OnErrorGoto0** · 01-04-2012, 02:40 AM

Are you saying you get no errors but your file is still not saved? That would be most peculiar.
Did the code previously work in 2003 or 2007 - you mention both at different places in the question?