Excelを落とす場合 for each Process in _ GetObject("winmgmts:{impersonationLevel=impersonate}").ExecQuery ("select * from Win32_Process where Name='EXCEL.EXE'") Process.terminate Nextネタ元 http://oshiete.goo.ne.jp/qa/1527968.html