Edit

Share via

Resource.CostRateTables property (Project)

  • Article

Gets a CostRateTables collection representing the cost rate tables for the resource. Read-only CostRateTables.

Syntax

expression. CostRateTables

expression A variable that represents a Resource object.

Example

The following example lists the standard pay rates for all the cost rate tables of the resource in the active cell.

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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.