Excel VisualBasic Script

Sub save()
    ActiveWorkbook.SaveAs FileName:="Salaries.xls"
End Sub