Объект SplitPart (Проект)

Статья
04/07/2023

Представляет часть задачи. Объект SplitPart является членом коллекции SplitParts .

Примеры

Использование объекта SplitPart

Используйте SplitParts (Index ), гдеIndex — это номер индекса части задачи, чтобы вернуть один объект SplitPart . В следующем примере перечислены время начала и окончания каждой части задачи в активной ячейке.

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

Использование коллекции SplitParts

Используйте свойство SplitParts , чтобы вернуть коллекцию SplitParts . В следующем примере возвращается количество частей задачи для каждой задачи в активном проекте.

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

Используйте метод Split (объект Task ), чтобы добавить объект SplitPart в коллекцию SplitParts . (Метод Split создает разделение в задаче.) В следующем примере создается разделение задачи со среды на понедельник в октябре 2012 г.

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

Методы

Имя
Delete

Свойства

Имя
Application
Finish
Index
Parent
Start

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.