Метод Resource.Level (Project)

Выравнивание ресурса.

Синтаксис

выражение. Level

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

Пример

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

Sub LevelResourcesInSelectedTasks() 
    Dim T As Task ' Task object used in For Each loop 
    Dim A As Assignment ' Assignment object used in For Each loop 
 
    For Each T In ActiveSelection.Tasks 
        For Each A In T.Assignments 
            If ActiveProject.Resources(A.ResourceID).Overallocated Then 
                ActiveProject.Resources(A.ResourceID).Level 
            End If 
        Next A 
    Next T 
End Sub

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

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