Resource.PayRates property (Project)
Gets a PayRates collection that represents the various pay rates on the cost rate table for a resource. Read-only PayRates.
Syntax
expression. PayRates
expression A variable that represents a Resource object.
Remarks
For the Resource object, the PayRates property returns pay rates for cost rate table A, the default table.
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.