Свойство TaskDependency.LagType (Project)
Возвращает единицу времени задержки между связанными задачами. PjFormatUnit, доступный только для чтения.
Синтаксис
выражение. LagType
Выражение Переменная, представляющая объект TaskDependency .
Замечания
В свойстве Lag строковые значения по умолчанию — дни, если не указано иное. Нестроковые значения интерпретируются как минуты. Чтобы указать время выполнения между задачами, используйте отрицательное значение для свойства Lag .
Пример
Чтобы использовать макрос SetLagWeeks , создайте две задачи, где задача 2 связана с задачей 1. При выполнении макроса в окне Интерпретация отображаются значения 4800 и 9, где время задержки составляет 4800 минут, а тип задержки — 9 (pjWeeks).
Sub SetLagWeeks()
Dim tsk As Task
Set tsk = ActiveProject.Tasks(2)
tsk.TaskDependencies(1).Lag = "2w"
Debug.Print tsk.TaskDependencies(1).Lag
Debug.Print tsk.TaskDependencies(1).LagType
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.