Excel VisualBasic Script

Public Sub SaveSpecificWorkbook2()
  
  Dim W As Workbook
  Set W = Application.Workbooks.Add
  Call W.SaveAs("temp2.xls")
  
End Sub