Share via


Resource.CostPerUse property (Project)

Ruft ab oder legt die Kosten pro Einsatz einer Ressource. Variant mit Lese-/Schreibzugriff.

Syntax

Ausdruck. CostPerUse

Ausdruck Eine Variable, die ein Resource-Objekt darstellt.

Beispiel

Im folgenden Beispiel wird die Summe der Kosten pro Einsatz aller Ressourcen des aktiven Projekts angezeigt.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.