VBA Save As Workbook in Specific Folder Excel Macro

VBA code to save as Workbook to specific folder example code will help us to save as the excel workbook in desired location. We can use SaveAs method of Workbook to save the file. In this example we will see how to save as the Excel workbook using VBA. And this code should work for all the version of Microsoft Excel 2003, Excel 2007, Excel 2010, and Excel 2013.

VBA code to save as Workbook

Here is the Example VBA syntax and Example VBA code to save as Workbook. This will help you to how to save Excel workbook in Specific directory using VBA.

VBA Save as Workbook: Syntax

Following is the VBA Syntax and sample VBA code to save as Workbook using VBA. We are using the SaveAs method of the Excel Workbook object. This will take full path to save the workbook.


ACTIVEWORKBOOK.SAVEAS (“C:TEMPTEST1.XLSX”)

Here workbook can be ActiveWorkbook, ThisWorkbook or a workbook assigned to an object.
ActiveWorkbook.SaveAs will Save the currently active Excel Workbook. And ThisWorkbook.SaveAs will save the workbook which we have written our VBA code. And we can set the workbook to any object and we can save it using WorkbookObject.SaveAs method as shown below:

Dim aWb as Workbook
Set aWb=ActiveWorkbook
aWb.SaveAs “C:temptest1.xlsx”

Here is explained VBA code:
‘Declaring the wb object as Workbook, in the next statement we will assign the active workbook to this object.
Dim awb As Workbook

‘Assigning Thisworkbook to workbook object i.e.; awb.
Set awb = ActiveWorkbook

We are saving the workbook using workbook object which we have created above and SaveAs method of the workbook.
awb.SaveAs “C:temptest1.xlsx”

Like this we can assign any workbook to an object. And then we can save the Excel Workbook using Object in VBA.

Save as Workbook using VBA: Examples

The following VBA code is to Save the Excel File in desired location. This code will save as the Active Workbook into location mentioned in the code.

Sub sbVBS_To_SaveAs_ActiveWorkbook()
    ActiveWorkbook.SaveAs "C:temptest1.xlsx"
End Sub

Instructions to run the VBA code to save as Excel Workbook into a specific folder

Please follow the below steps to execute the VBA code to save as the excel file.
Step 1: Open any existing Excel workbook
Step 2: Press Alt+F11 – This will open the VBA Editor
Step 3: Insert a code module from then insert menu
Step 4: Copy the above code and paste in the code module which have inserted in the above step
Step 5: Activate any workbook
Step 6: Now press F5 to execute the code

Now you can observe that your Active Excel workbook is saved in the specific location with the changes.

Explained VBA Code to SaveAs the Excel File :

Starting procedure to write VBA code to SaveAs Excel Workbook using VBA.
Sub sbVBS_To_SaveAs_ActiveWorkbook _C()

‘To save ActiveWorkbook, i.e the workbook which we currently activated (this may or may not contain the code module and this procedure). We are using SaveAs method of the workbook to save the excel file.

ActiveWorkbook.SaveAs “C:temptest1.xlsx”

End Sub
Ending sub procedure.

Here ActiveWorkbook object represent the workbook which we currently activated. And SaveAs is the Workbook method to Save the Excel File in the required path. You can find the example code to save the Workbook in different situations in other topics.