Метод Task.Split (Project)

Разбивает задачу на две части.

Синтаксис

expression. Split (StartSplitOn, EndSplitOn)

Выражение Переменная, представляющая объект Task .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
StartSplitOn	Обязательный	Variant	Дата начала разбиения задачи. Если время не указано, используется время окончания проекта по умолчанию для рабочего периода.
EndSplitOn	Обязательный	Variant	Дата окончания разбиения задачи. Если время не указано, используется время начала проекта по умолчанию для рабочего периода. Если endSplitOn находится на дате, указанной с помощью StartSplitOn, разделение не создается.

Пример

В следующем примере создается разделение в указанной задаче.

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

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

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