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.