Application.Tasks (Word)
Gibt eine Tasks -Auflistung zurück, die alle ausgeführten Anwendungen darstellt.
Informationen zum Zurückgeben eines einzelnen Elements einer Auflistung finden Sie unter zurückgeben eines Objekts aus einer Auflistung.
If Tasks.Exists("Calculator") Then
With Tasks("Calculator")
.Activate
.WindowState = wdWindowStateNormal
End With
Else
Shell "calc.exe"
Tasks("Calculator").WindowState = wdWindowStateNormal
End If