Partilhar via


Objeto CostRateTables (Project)

Contém uma coleção de objetos CostRateTable.

Exemplo

Usando a coleção CostRateTables

Use a propriedade CostRateTables para retornar uma coleção CostRateTables. O exemplo seguinte lista as taxas de pagamento padrão de todas as tabelas de taxa de custo do recurso na célula ativa.

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 & vbCrLf 

 Next PR 

Next CRT 

 

MsgBox Rates

Propriedades

Nome
Aplicativo
Count
Item
Parent

Confira também

Modelo de objeto do projeto

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.