Share via


PayRates Property

Returns a PayRates collection that represents the various pay rates on a resource's cost rate table. Read-only.

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

Applies to | CostRateTable Object, CostRateTables Collection Object | Resource Object, Resources Collection Object

See Also | CostPerUse Property | CostRateTable Property | CostRateTables Property | EffectiveDate Property | OvertimeRate Property | PayRate Object, PayRates Collection Object | StandardRate Property