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