Propriedade Resource.PayRates (Project)
Obtém uma coleção PayRates que representa as várias taxas de pagamento na tabela de taxas de custo para um recurso. Somente leitura PayRates.
Sintaxe
expression. PayRates
Expressão Uma variável que representa um objeto Resource .
Comentários
Para o objeto de recurso, a propriedade PayRates retorna taxas de pagamento para a tabela de taxas de custo A, a tabela padrão.
Exemplo
O exemplo a seguir lista as remunerações padrão para todas as tabelas de taxas de custo do recurso na célula ativa.
Sub ListPayRates()
Dim CRT As CostRateTable, PR As PayRate
Dim Rates As String
For Each CRT In ActiveCell.Resource.CostRateTables
For Each PR In CRT.PayRates
Rates = Rates & "CostRateTable " & CRT.Name & ": " & _
PR.StandardRate & " (Effective " & PR.EffectiveDate & _
")" & vbCrLf
Next PR
Next CRT
MsgBox Rates
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.