Edit

Share via

GroupCriteria object (Project)

  • Article

Contains a collection of GroupCriterion objects.

Remarks

For groups where the group hierarchy can be maintained and cell color can be a hexadecimal value, use the GroupCriteria2 collection object.

Example

Using the GroupCriterion Object

Use **GroupCriteria(**Index ), whereIndex is the criterion index, to return a single GroupCriterion object. The following example sets the cell color for the first criterion in the Standard Rate resource group to blue.

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

Using the GroupCriteria Collection

Use the GroupCriteria property to return a GroupCriteria collection. The following example displays a list of the fields used as criteria in the specified task group and whether they are sorted in ascending or descending order.

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

Use the Add method to add a GroupCriterion object to the GroupCriteria collection. 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.ResourceGroups("Response Pending").GroupCriteria.Add "% Work Complete", True, CellColor:=pjRed, GroupOn:=pjGroupOnPct1_25

Methods

Name
Add

Properties

Name
Application
Count
Item
Parent

See also

Project Object Model

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.