Compartir a través de

Objeto PayRate (Project)

  • Artículo

Representa una línea de tasas de la tabla de tasas de costo de un recurso. El objeto PayRate es miembro de la colección PayRates.

Uso del objeto PayRate

Use PayRates (Index ), dondeIndex es el número de índice de tasa de pago o la fecha para la que devolver las tasas en vigor, para devolver un único objeto PayRate . En el ejemplo siguiente se devuelve la tasa de pago estándar para la primera fila de tasas de Tamara en la tabla de tasas de costo C.

ActiveProject.Resources("Tamara").CostRateTables("C").PayRates(1).StandardRate

Uso del conjunto PayRates

Utilice la propiedad PayRates para devolver un conjunto PayRates. En el ejemplo siguiente se enumeran las tasas de pago estándar de todas las tablas de tasas de costo del recurso de la celda activa.

Dim CRT As CostRateTable
DIM 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

Utilice el método Add para agregar un objeto PayRate al conjunto PayRates. En el ejemplo siguiente se agrega una línea a la tabla de tasas de costo de Tamara "C" con una fecha efectiva del 1 de septiembre de 2012, una tasa estándar de 40,00 $ por hora, una tasa de horas extra de $60,00 por hora y un costo por uso de 0 $.

ActiveProject.Resources("Tamara").CostRateTables("C").PayRates.Add "9/1/2012", "$40/h", "$60/h", "$0"

Métodos

Nombre
Delete

Propiedades

Nombre
Application
CostPerUse
EffectiveDate
Índice
OvertimeRate
Parent
StandardRate

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.