Объект CostRateTables (Project)
Содержит коллекцию объектов CostRateTable .
Пример
Использование коллекции CostRateTables
Используйте свойство CostRateTables , чтобы вернуть коллекцию CostRateTables . В следующем примере перечислены стандартные ставки оплаты для всех таблиц затрат ресурса в активной ячейке.
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
Свойства
| Имя |
|---|
| Application |
| Count |
| Item |
| Parent |
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.