Identifying if WINWORD.EXE is running (Office 2010)

[Jack21]

Hi - can anyone help?

On opening a Windows Application Form I need to identify if WINWORD.EXE is running before I action any code. Is there a way to check if the application is open?

Thanks
Jack

[Leif]

Does VBA Tips & Tricks: Generic Function to Check if Application is Running help?

[Jack21]

Thanks Leif .... works like a charm.

I stand corrected - it's not exactly what I'm after. The issue I have is that certain documents are causing Word 2010 to hang, the user will then close Word but WINWORD.EXE stays open in the taskpane. I need to identify if WINWORD.EXE is open before ending the process so I can run the necessary code to repair the document that is causing Word 2010 to hang.

Any ideas?

Cheers
Jack

[Jack21]

This works guys .... just in case anyone needs it in the future:

Dim strComputer As String = "."
Dim strProcessKill As String = "'winword.exe'"
Dim objWMIService As Object = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Dim colProcess As Object = objWMIService.ExecQuery("Select * from Win32_Process Where Name = " & strProcessKill)

For Each objProcess As Object In colProcess
objProcess.Terminate()
Next

[HansV]

Thanks for sharing the solution!

[John Gray]

It's a one-line BATch file, if anyone is interested!