Propriedade Task.RemainingOvertimeCost (Project)

Obtém o custo de horas extras restante para a tarefa. Somente leitura Variant.

Sintaxe

expression. RemainingOvertimeCost

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

Exemplo

O exemplo a seguir retorna o custo de horas extras restante de cada uma das tarefas do projeto ativo.

Sub ReturnOvertimeCost() 
 Dim T As Task ' Task object used in For Each loop 
 Dim Results As String 
 
 For Each T In ActiveProject.Tasks 
 Results = Results & T.Name & ": " & ActiveProject.CurrencySymbol & _ 
 T.RemainingOvertimeCost & ListSeparator & " " 
 Next T 
 
 Results = Left$(Results, Len(Results) - Len(ListSeparator & " ")) 
 
 MsgBox Results 
 
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.