GroupCriteria2-Objekt (Project)GroupCriteria2 object (Project)

Enthält eine Auflistung von GroupCriterion2 -Objekten, in der die Gruppenhierarchie verwaltet werden kann und die Zellfarbe ein Hexadezimalwert sein kann.Contains a collection of GroupCriterion2 objects, where the group hierarchy can be maintained and cell color can be a hexadecimal value.

BeispielExample

Verwenden des GroupCriterion2-ObjektsUsing the GroupCriterion2 Object

Verwenden Sie * GroupCriteria2 ( * * Index* ), wobei*Index * der Kriterium Index ist, um ein einzelnes GroupCriterion2 -Objekt zurückzugeben.Use GroupCriteria2(***Index ), whereIndex* is the criterion index, to return a single GroupCriterion2 object. Im folgende Beispiel wird die Zellfarbe für das erste Kriterium in der Ressourcengruppe Standard Rate auf Blau festgelegt.The following example sets the cell color for the first criterion in the Standard Rate resource group to blue.

ActiveProject.ResourceGroups2("Standard Rate").GroupCriteria2(1).CellColor = &HFF0000

Verwenden des GroupCriterion2-ObjektsUsing the GroupCriteria2 Collection

Verwenden Sie die GroupCriteria -Eigenschaft, um eine GroupCriteria2 -Auflistung zurückzugeben.Use the GroupCriteria property to return a GroupCriteria2 collection. Im folgenden Beispiel wird eine Liste der Felder, die in der angegebenen Vorgangsgruppe als Kriterien verwendet werden, und deren Sortierreihenfolge (aufsteigend oder absteigend) angezeigt.The following example displays a list of the fields used as criteria in the specified task group and shows whether they are sorted in ascending or descending order.

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

MsgBox Fields

Verwenden Sie die Addex -Methode, um der GroupCriteria2 -Auflistung ein GroupCriterion2 -Objekt hinzuzufügen, wobei CellColor ein Hexadezimalwert sein kann.Use the AddEx method to add a GroupCriterion2 object to the GroupCriteria2 collection, where CellColor can be a hexadecimal value. 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.The following example adds another criterion to the specified resource group, grouping resources in ascending order as determined by the percentage of their work (in 25-percent increments) that is complete.

ActiveProject.ResourceGroups2("Response Pending").GroupCriteria2.AddEx "% Work Complete", True, _  
    CellColor:=&H0101FF, GroupOn:=pjGroupOnPct1_25

MethodenMethods

NameName
AddAdd
AddExAddEx

EigenschaftenProperties

NameName
AnwendungApplication
CountCount
ElementItem
ParentParent

Siehe auchSee also

Project-ObjektmodellProject Object Model

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.