Compartir por


Método Task.Split (Project)

Divide la tarea en dos partes.

Sintaxis

expresión. Split (StartSplitOn, EndSplitOn)

expresión Variable que representa un objeto Task .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
StartSplitOn Obligatorio Variant Fecha de comienzo de la división de la tarea. Si no se especifica ninguna hora, se usa la hora de fin predeterminada del período de trabajo.
EndSplitOn Obligatorio Variant División de la fecha de finalización de la tarea. Si no se especifica una hora, se utiliza la hora de comienzo predeterminada del proyecto del período de trabajo. Si EndSplitOn está en o antes de la fecha especificada con StartSplitOn, no se crea la división.

Ejemplo

En el ejemplo siguiente se crea una división en la tarea especificada.

Sub CreateSplit() 
    Dim WhichTask As Long 
    Dim SplitFrom As Variant, SplitTo As Variant 
 
    WhichTask = InputBox("Enter the ID of the task you would like to split:") 
    SplitFrom = InputBox("Enter the date and time for the start of the" & _
        " split: " & vbCrLf & vbCrLf & "(The default time is the end" & _
    " time of the preceding working period.)") 
    SplitTo = InputBox("Enter the date and time for the end of the split:" & _
        vbCrLf & vbCrLf & "(The default time is the start time of the next" & _
        " working period.)") 
 
    ActiveProject.Tasks(WhichTask).Split SplitFrom, SplitTo 
End Sub

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.