Tip Printed from ExcelTip.com
Add and Save new Workbook using VBA in Microsoft Excel


Place the code below into the standard module

Sub AddSaveAsNewWorkbook()
	Dim Wk As Workbook
	Set Wk = Workbooks.Add
	Application.DisplayAlerts = False
	Wk.SaveAs Filename:="C:/MyData/SalesData.xls"
End Sub