Objeto SplitPart (Project)

Representa uma parte de uma tarefa. O objeto SplitPart é um membro da coleção SplitParts.

Exemplos

Usando o objeto SplitPart

Use SplitParts (Index ), emque Index é o número de índice da parte da tarefa, para retornar um único objeto SplitPart . O exemplo a seguir lista o início e término tempos de cada parte da tarefa na célula ativa.

Dim Part As Long, Portions As String

For Part = 1 To ActiveCell.Task.SplitParts.Count
    With ActiveCell.Task
        Portions = Portions & "Task portion " & Part & ": Start on " & _
            .SplitParts(Part).Start & ", Finish on " & _
            .SplitParts(Part).Finish & vbCrLf
    End With
Next Part

MsgBox Portions

Usando a coleção SplitParts

Use a propriedade SplitParts para retornar uma coleção SplitParts. O exemplo a seguir retorna o número de partes de cada tarefa no projeto ativo.

Dim T As Task

For Each T In ActiveProject.Tasks
    If Not (T Is Nothing) Then
        MsgBox T.Name & ": " & T.SplitParts.Count
    End If

Next T

Use o método Split (objeto Task ) para adicionar um objeto SplitPart à coleção SplitParts . (O método Split cria uma divisão em uma tarefa.) O exemplo a seguir cria uma divisão na tarefa de quarta-feira a segunda-feira, de outubro de 2012.

ActiveCell.Task.Split "10/3/2012", "10/8/2012"

Métodos

Nome
Delete

Propriedades

Nome
Application
Finish
Índice
Responsável
Start

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.