Propiedad Task.PathDrivingPredecessor (Project)

Obtiene un valor que indica si la tarea es una predecesora que controla la tarea seleccionada, cuando el elemento Predecesores de conducción está seleccionado en la lista desplegable Ruta de acceso a la tarea. Boolean de solo lectura.

Sintaxis

expresión. PathDrivingPredecessor

Expresión Variable que representa un objeto Task .

Comentarios

La propiedad Task.PathDrivingPredecessor está relacionada con el elemento Predecesores de conducción de la lista desplegable Ruta de acceso de tarea, en la pestaña FORMATO , en HERRAMIENTAS DE GRÁFICO GANTT de la cinta de opciones. La ruta de acceso de la tarea es principalmente una característica de formato en el cliente de Project, donde las tareas del gráfico de Gantt tienen colores que dependen de la selección de tareas actual y de la relación de una tarea especificada con la selección. En la figura 1, los elementos Predecesores de conducción y Sucesores controlados se seleccionan en la lista desplegable Ruta de acceso de tarea. Al seleccionar T3, el diagrama de Gantt muestra que T1 es una tarea predecesora de conducción y T4 es una tarea sucesora controlada.

Figura 1. Uso de las propiedades de ruta de tarea para resaltar tareas

La propiedad PathDrivingPredecessor no actúa como la selección Driving Predecessors en la interfaz de usuario. En su lugar, la propiedad PathDrivingPredecessor es True cuando se cumplen las condiciones siguientes: (a) la tarea es una predecesora conductora de la tarea seleccionada y (b) el elemento Predecesores de conducción está seleccionado en Ruta de acceso de tarea. Puede seleccionar manualmente una tarea o usar VBA para seleccionar una tarea y, a continuación, usar VBA para comprobar si otra tarea es una predecesora conductora de la tarea seleccionada. Por ejemplo, si selecciona la tercera tarea como en la figura 1 y el elemento Predecesores de conducción está seleccionado en Ruta de acceso de la tarea, la siguiente instrucción imprime True en la ventana Inmediato del VBE.

? ActiveProject.Tasks(1).PathDrivingPredecessor

Sin embargo, si el elemento Predecesores de conducción no está seleccionado, la instrucción anterior imprime False. Project no tiene un método VBA que pueda establecer elementos en la lista desplegable Ruta de acceso de tarea.

Ejemplo:

La macro TestTaskPath selecciona cada tarea de un proyecto y, a continuación, usa las cuatro propiedades de ruta de acceso de tarea a su vez para mostrar cómo se relacionan las otras tareas con la tarea seleccionada.

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 el proyecto de la figura 1, si los elementos Predecesores, Predecesores de conducción, Sucesores y Sucesores controlados están seleccionados en Ruta de acceso de tarea, la macro TestTaskPath tiene la siguiente salida:

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 propiedad

VARIANT

Consulte también

Objeto Task

PathDrivenSuccessor (propiedad)PathPredecessor (propiedad) PathSuccessor (propiedad)

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.