Compartir a través de

Propiedad Resource.CostPerUse (Project)

  • Artículo

Obtiene o establece el costo por uso de un recurso. Variante de lectura y escritura.

Sintaxis

expresión. CostPerUse

Expresión Variable que representa un objeto Resource .

Ejemplo:

En el siguiente ejemplo, se muestra la suma del costo por uso de cada recurso del proyecto activo.

Sub TotalCostPerUse() 
 
 Dim R As Resource ' Resource object used in For Each loop 
 Dim TotalCostPerUse As Double ' The total cost per use 
 
 ' Add up the cost per use of each resource. 
 For Each R In ActiveProject.Resources 
 TotalCostPerUse = TotalCostPerUse + R.CostPerUse 
 Next R 
 
 ' Display the total cost per use. 
 MsgBox ("Sum of the cost per use of each resource in this project: " & TotalCostPerUse) 
 
End Sub

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.