Método Task.Split (Project)

Divide a tarefa em duas partes.

Sintaxe

expressão. Split (StartSplitOn, EndSplitOn)

Expressão Uma variável que representa um objeto Task .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
StartSplitOn	Obrigatório	Variant	A data de início da divisão da tarefa. Se o horário não for especificado, a hora padrão de término do projeto para o período de trabalho será utilizada.
EndSplitOn	Obrigatório	Variant	A data de término da tarefa dividida. Se um tempo não for especificado, a hora de início do projeto padrão para o período de trabalho é usada. Se EndSplitOn estiver ativado ou antes da data especificada com StartSplitOn, a divisão não será criada.

Exemplo

O exemplo a seguir cria uma divisão na tarefa 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

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.