Classe Tasks (Word VBA)
Uma coleção de objetos Task que representa todas as tarefas atualmente em execução no sistema. Para usar uma variável de classe Tasks, ela primeiro precisa ser instanciada por exemplo
Dim tsks as Tasks
Set tsks = Tasks
For Each
Aqui está um exemplo de processamento dos itens Tasks em uma coleção.
Dim tsk As Task
For Each tsk In Tasks
Next tsk
Count
Retorna um Long que representa o número de tarefas na coleção. Somente leitura.
Dim lngCount As Long
lngCount = Tasks.Count
Exists
Determina se a tarefa especificada existe. Retorna true se a tarefa existir.
Exists (Name)
Name: O nome da tarefa.
If Tasks.Exists("Calculator") = False Then
Shell "Calc.exe"
Else
Tasks("Calculator").Activate
End If
Tasks("Calculator").WindowState = wdWindowStateNormal
ExitWindows
Fecha todos os aplicativos abertos, encerra o Microsoft Windows e efetua logoff no usuário atual.
Este método não salva alterações feitas em documentos abertos do Microsoft Word; contudo, ele pergunta se você deseja salvar alterações em documentos abertos de outros aplicativos baseados no Windows.
Documents.Save NoPrompt:=True, _
OriginalFormat:=wdOriginalDocumentFormat
Tasks.ExitWindows
Item
Retorna um objeto Task individual em uma coleção.
Item (Index)
Index: O objeto individual a ser retornado. Pode ser um Long que indica a posição ordinal ou uma cadeia de caracteres que representa o nome do objeto individual.
Dim tsk As Task
Set tsk = Tasks(Index:=1)