Partager via


Objet CostRateTables (Project)

Contient une collection d’objets CostRateTable .

Exemple

Utilisation de la collection CostRateTables

Utilisez la propriété CostRateTables pour renvoyer une collection CostRateTables . L’exemple suivant montre comment répertorier les taux de salaire standard pour toutes les tables des taux de coûts de la ressource située dans la cellule active.

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 & vbCrLf 

 Next PR 

Next CRT 

 

MsgBox Rates

Propriétés

Nom
Application
Count
Élément
Parent

Voir aussi

Modèle objet Project

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.