SplitPart, objet (Project)SplitPart object (Project)

Représente une portion d’une tâche.Represents a task portion. L’objet SplitPart est un membre de la collection SplitParts .The SplitPart object is a member of the SplitParts collection.

ExemplesExamples

Utilisation de l'objet SplitPartUsing the SplitPart Object

Utilisez SplitParts (index ), oùindex est le numéro d’index de la partie tâche, pour renvoyer un seul objet SplitPart .Use SplitParts (Index ), whereIndex is the index number of the task portion, to return a single SplitPart object. L'exemple suivant montre comment répertorier les heures de début et de fin de chaque portion de la tâche contenue dans la cellule active.The following example lists the start and finish times of each task portion of the task in the active cell.

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

Utilisation de la collection SplitPartsUsing the SplitParts Collection

Utilisez la propriété SplitParts pour renvoyer une collection SplitParts .Use the SplitParts property to return a SplitParts collection. L’exemple suivant montre comment renvoyer le nombre de portions de la tâche pour chaque tâche du projet actif.The following example returns the number of task portions for each task in the active project.

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

Utilisez la méthode Split (objetTask ) pour ajouter un objet SplitPart à la collection SplitParts .Use the Split method (Task object) to add a SplitPart object to the SplitParts collection. (La méthode Split crée une tâche fractionnée.) L’exemple suivant crée une division de la tâche du mercredi au lundi, en octobre de 2012.(The Split method creates a split in a task.) The following example creates a split in the task from Wednesday to Monday, in October of 2012.

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

MéthodesMethods

NomName
DeleteDelete

PropriétésProperties

NomName
ApplicationApplication
FinishFinish
IndexIndex
ParentParent
StartStart

Assistance et commentairesSupport and feedback

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ?Have questions or feedback about Office VBA or this documentation? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.