GroupCriterion-Objekt (Project)

Stellt ein Kriterium in einer Gruppendefinition dar. Das GroupCriterion -Objekt ist ein Element der GroupCriteria -Auflistung.

HinwBemerkungeneise

Weitere Informationen zur Verwendung von Gruppen, in denen die Gruppenhierarchie verwaltet und die Zellfarbe durch einen Hexadezimalwert dargestellt werden kann, finden Sie beim GroupCriterion2 -Objekt.

Beispiel

Verwenden des GroupCriterion-Objekts

Verwenden Sie **GroupCriteria(**Index), wobeiIndex der Kriterienindex ist, um ein einzelnes GroupCriterion-Objekt zurückzugeben. Im folgende Beispiel wird die Zellfarbe für das erste Kriterium in der Ressourcengruppe Standard Rate auf Blau festgelegt.

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

Verwenden der GroupCriteria-Auflistung

Verwenden Sie die GroupCriteria -Eigenschaft, um eine GroupCriteria -Auflistung zurückzugeben. Im folgenden Beispiel wird eine Liste der Felder, die in der angegebenen Vorgangsgruppe als Kriterien verwendet werden, und deren Sortierreihenfolge (aufsteigend oder absteigend) angezeigt.

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

Verwenden Sie die Add -Methode, um der GroupCriteria -Auflistung ein GroupCriterion -Objekt hinzuzufügen. Im folgenden Beispiel wird der angegebenen Ressourcengruppe ein weiteres Kriterium hinzugefügt, wobei die Ressourcen in aufsteigender Reihenfolge gemäß des Prozentsatzes der abgeschlossenen Arbeit (in Schritten von 25 %) gruppiert werden.

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

Methoden

Name
Delete

Eigenschaften

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

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.