Using SaveAs

Feb 27th, 2002, 12:20 PM

I want to save my workbook using VBA. I wnat the open workbook to be saved in the same directory where it is residing. How do I complete the following?

Application.ThisWorkbook.SaveAS

dk · Feb 27th, 2002, 12:43 PM

The fact that you say that you want to save the workbook in the folder it is currently residing would imply that the workbook has been saved. Therefore, just use this:-

ThisWorkbook.Save

If you want to create a second copy then use:-

ThisWorkbook.SaveAs ThisWorkbook.Path & "anyoldname.xls"

HTH,
D

Feb 27th, 2002, 12:55 PM

Thanks DK. Just what I was looking for.

Stan

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Feb 27th, 2002, 12:20 PM	#1
Guest Posts: n/a	I want to save my workbook using VBA. I wnat the open workbook to be saved in the same directory where it is residing. How do I complete the following? Application.ThisWorkbook.SaveAS

Feb 27th, 2002, 12:43 PM	#2
dk MrExcel MVP Join Date: Feb 2002 Location: Sydney, Australia Posts: 2,908	The fact that you say that you want to save the workbook in the folder it is currently residing would imply that the workbook has been saved. Therefore, just use this:- ThisWorkbook.Save If you want to create a second copy then use:- ThisWorkbook.SaveAs ThisWorkbook.Path & "anyoldname.xls" HTH, D

Feb 27th, 2002, 12:55 PM	#3
Guest Posts: n/a	Thanks DK. Just what I was looking for. Stan