Project.Resource.CostRateTables.md

title	ms.service	api_name	ms.assetid	ms.date	ms.localizationpriority
Resource.CostRateTables property (Project)	project-server	Project.Resource.CostRateTables	604d89ee-a16e-812e-0459-b93ed096340e	06/08/2017	medium

Resource.CostRateTables property (Project)

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

[!includeSupport and feedback]