Compartilhar via


Método Resource.Level (Project)

Redistribui o recurso.

Sintaxe

expression. Level

Expressão Uma variável que representa um objeto Resource .

Exemplo

O exemplo a seguir redistribui os recursos das tarefas selecionadas.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.