Opened applications

[Patrick]

Hello,

Would it be possible to list all the opened applications/windows that a user
sees in the taskbar?
I know how to list the running processes, but two windows can have the same
process.

Thank you in advance for any suggestion.
Regards

 

[Steve Yandl]

Patrick,

You can use "Tasks" if you open an instance of MS Word. The example below
is a bare bones approach; you would probably want to check if Word is
already open etc. but this will give you a start. The 'Name' property of a
given task is the friendly name (title bar type name) rather than the
process name (which is often different).

'------------------------------------------

Sub ListVisibleWindows()
Set objWord = CreateObject("Word.Application")
For Each myTask In objWord.Tasks
If myTask.Visible Then
MsgBox myTask.Name
End If
Next myTask
objWord.Quit
Set objWord = Nothing
End Sub
'------------------------------------------

Steve Yandl