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.