Dim args, objExcel Set args = WScript.Arguments Set objExcel = CreateObject("Excel.Application") objExcel.Workbooks.open args(0) objExcel.Visible = True objExcel.Run "helloworld" objExcel.Activeworkbook.Save objExcel.Activeworkbook.Close(0) objExcel.Quit