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.