Propriedade Application.Tasks (Word)
Retorna uma coleção Tasks que representa todos os aplicativos em execução.
Sintaxe
expression. Tasks
Expressão Uma expressão que retorna um objeto Application .
Comentários
Para obter informações sobre como retornar um único membro de uma coleção, consulte Retornando um objeto de uma coleção.
Exemplo
Este exemplo exibe a calculadora. Se a calculadora não estiver sendo executada, o Word iniciará a tarefa e exibirá a calculadora.
If Tasks.Exists("Calculator") Then
With Tasks("Calculator")
.Activate
.WindowState = wdWindowStateNormal
End With
Else
Shell "calc.exe"
Tasks("Calculator").WindowState = wdWindowStateNormal
End If
Este exemplo verifica se o Microsoft Excel está sendo executado no momento. Se a tarefa estiver em execução, o exemplo ativará o Microsoft Excel; caso contrário, uma caixa de mensagem será exibida.
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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.