Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Разбивает задачу на две части.
Синтаксис
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 и обратная связь.