リファレンス、WScript オブジェクト、GetObject メソッド

Set myExcel = GetObject("c:\foo.xls")
myExcel.Application.Visible = True
myExcel.Application.WorkBooks.Add