Propriedade Task.PathSuccessor (Project)

Obtém um valor que indica se a tarefa é uma sucessora da tarefa selecionada, quando o item Sucessores está selecionado na lista pendente Caminho da Tarefa . Boolean somente leitura.

Sintaxe

expression. PathSuccessor

expressão Uma variável que representa um objeto de Tarefa .

Comentários

A propriedade Task.PathSuccessor está relacionada com o item Sucessores na lista pendente Caminho da Tarefa, no separador FORMATAR, em FERRAMENTAS DE GRÁFICO GANTT no friso. O caminho da tarefa é principalmente uma funcionalidade de formatação no cliente do Project, em que as tarefas no gráfico Gantt têm cores que dependem da seleção da tarefa atual e da relação de uma tarefa especificada com a seleção. Na Figura 1, os itens Predecessoras De Condução e Sucessores Orientados estão selecionados na lista pendente Caminho da Tarefa . Quando seleciona T3, o Gráfico Gantt mostra que T1 é uma tarefa antecessora de condução e O T4 é uma tarefa sucessora condicionada.

Figura 1. Using the task path properties to highlight tasks

A propriedade PathSuccessor não funciona como a seleção Sucessoras na interface de utilizador. Em vez disso, a propriedade PathSuccessor é Verdadeiro quando as condições seguintes são verdadeiras: (a) a tarefa é uma sucessora da tarefa selecionada e (b) o item Sucessores está selecionado no Caminho da Tarefa. Pode selecionar manualmente uma tarefa ou utilizar o VBA para selecionar uma tarefa e, em seguida, utilizar o VBA para marcar se outra tarefa é sucessora da tarefa selecionada. Por exemplo, se selecionar a terceira tarefa como na Figura 1 e o item Sucessores estiver selecionado em Caminho da Tarefa, a seguinte instrução imprime Verdadeiro na janela Imediato do VBE.

? ActiveProject.Tasks(4).PathSuccessor

No entanto, se o item Sucessores não estiver selecionado, a instrução anterior imprime Falso. O Project não tem um método VBA que possa definir itens na lista pendente Caminho da Tarefa .

Exemplo

A macro TestTaskPath seleciona cada tarefa num projeto e, em seguida, utiliza as quatro propriedades do caminho da tarefa por sua vez para mostrar como as outras tarefas se relacionam com a tarefa selecionada.

Option Explicit

Sub TestTaskPath()
    Dim t As Task
    Dim chkTsk As Task
    Dim selectedTaskId As Integer
    
    For Each t In ActiveProject.Tasks
        selectedTaskId = t.ID
        Application.SelectRow Row:=selectedTaskId, RowRelative:=False
            
        If Not (ActiveSelection.Tasks Is Nothing) Then
            Debug.Print
            
            With ActiveSelection.Tasks(1)
                Debug.Print "Selected task ID " & .UniqueID & ", name: " & .Name
            End With
                        
            For Each chkTsk In ActiveProject.Tasks
                If Not (chkTsk.ID = selectedTaskId) Then
                    If chkTsk.PathPredecessor Then
                        Debug.Print vbTab & chkTsk.Name & ": PathPredecessor"
                    End If
                    If chkTsk.PathDrivingPredecessor Then
                        Debug.Print vbTab & chkTsk.Name & ": PathDrivingPredecessor"
                    End If
                    If chkTsk.PathSuccessor Then
                        Debug.Print vbTab & chkTsk.Name & ": PathSuccessor"
                    End If
                    If chkTsk.PathDrivenSuccessor Then
                        Debug.Print vbTab & chkTsk.Name & ": PathDrivenSuccessor"
                    End If
                End If
            Next chkTsk
        End If
    Next t
End Sub

Para o projeto na Figura 1, se os itens Predecessoras, Predecessoras, Sucessoras e Sucessoras Condicionadas estiverem selecionados no Caminho da Tarefa, a macro TestTaskPath tem o seguinte resultado:

Selected task ID 1, name: T1
    T2: PathSuccessor
    T2: PathDrivenSuccessor
    T3: PathSuccessor
    T3: PathDrivenSuccessor
    T4: PathSuccessor
    T4: PathDrivenSuccessor

Selected task ID 2, name: T2
    T1: PathPredecessor
    T1: PathDrivingPredecessor

Selected task ID 3, name: T3
    T1: PathPredecessor
    T1: PathDrivingPredecessor
    T4: PathSuccessor
    T4: PathDrivenSuccessor

Selected task ID 4, name: T4
    T1: PathPredecessor
    T1: PathDrivingPredecessor
    T3: PathPredecessor
    T3: PathDrivingPredecessor

Valor de propriedade

VARIANT

Confira também

Objeto Task

PathDrivingPredecessor PropertyPathPredecessor PropertyPathDrivenSuccessor Property

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.