Tasks Property Example

This example displays the calculator. If the calculator is not already running, then Word starts the task and then displays the calculator.

If Tasks.Exists("Calculator") Then
    With Tasks("Calculator")
        .Activate
        .WindowState = wdWindowStateNormal
    End With
Else
    Shell "calc.exe"
    Tasks("Calculator").WindowState = wdWindowStateNormal
End If

This example checks to see whether Microsoft Excel is currently running. If the task is running, the example activates Microsoft Excel; otherwise, a message box is displayed.

If Tasks.Exists("Microsoft Excel") = True Then
    With Tasks("Microsoft Excel")
        .Activate
        .WindowState = wdWindowStateMaximize
    End With
Else 
    Msgbox "Microsoft Excel is not currently running."
End If