Objet GroupCriterion (Project)

Article
04/07/2023

Représente un critère dans une définition de groupe. L’objet GroupCriterion est membre de la collection GroupCriteria.

Remarques

Pour utiliser des groupes dans lesquels la hiérarchie de groupes peut être conservée et la couleur de cellule peut être une valeur hexadécimale, consultez l’objet GroupCriterion2 .

Exemple

Utilisation de l'objet GroupCriterion

Pour renvoyer un seul objet GroupCriterion, utilisez **GroupCriteria(**Index) oùIndex est l’index du critère. L'exemple suivant montre comment affecter la couleur bleue à la cellule du premier critère du groupe de ressources Taux standard.

ActiveProject.ResourceGroups("Standard Rate").GroupCriteria(1).CellColor = pjBlue

Utilisation de la collection GroupCriteria

Utilisez la propriété GroupCriteria pour renvoyer une collection GroupCriteria . L’exemple suivant montre comment afficher une liste des champs utilisés en tant que critères dans le groupe de tâches spécifié, ainsi que leur ordre de tri (croissant ou décroissant).

Dim GC As GroupCriterion 
Dim Fields As String 
 
For Each GC In ActiveProject.TaskGroups("Priority Keeping Outline Structure").GroupCriteria 
 If GC.Ascending = True Then 
 Fields = Fields & GC.Index & ". " & GC.FieldName & " is sorted in ascending order." & vbCrLf 
 Else 
 Fields = Fields & GC.Index & ". " & GC.FieldName & " is sorted in descending order." & vbCrLf 
 End If 
Next GC 
 
MsgBox Fields

Utilisez la méthode Add pour ajouter un objet GroupCriterion à la collection GroupCriteria . L’exemple suivant montre comment ajouter un autre critère au groupe de ressources spécifié pour regrouper les ressources dans l’ordre croissant en fonction de leur pourcentage de travail achevé (par incréments de 25 %).

ActiveProject.ResourceGroups("Response Pending").GroupCriteria.Add "% Work Complete", True, CellColor:=pjRed, GroupOn:=pjGroupOnPct1_25

Méthodes

Nom
Delete

Propriétés

Nom
Application
Ascending
Assignment
CellColor
FieldName
FontBold
FontColor
FontItalic
FontName
FontSize
FontUnderLine
GroupInterval
GroupOn
Index
Parent
Pattern
StartAt

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.

Partager via