Compartir a través de


Objeto GroupCriterion (Project)

Representa un criterio en una definición de grupo. El objeto GroupCriterion es un miembro del conjunto GroupCriteria.

Observaciones

Para usar grupos en los que se puede mantener la jerarquía de grupo y el color de celda puede ser un valor hexadecimal, vea el objeto GroupCriterion2.

Ejemplo

Uso del objeto GroupCriterion

Use **GroupCriteria(**Index), dondeIndex es el índice de criterio, para devolver un único objeto GroupCriterion . En el siguiente ejemplo establece el color de celda para el primer criterio en el grupo de recursos Tasa estándar en azul.

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

Uso del conjunto GroupCriteria

Use la propiedad GroupCriteria para devolver una colección GroupCriteria. En el ejemplo siguiente se muestra una lista de los campos usados como criterios en el grupo de tareas especificado y, asimismo, si se ordenan de forma ascendente o descendente.

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 el método Add para agregar un objeto GroupCriterion a la colección GroupCriteria. En el siguiente ejemplo se agrega otro criterio al grupo de recursos especificado, agrupando los recursos en orden ascendente por porcentaje de trabajo (en incrementos de 25 por ciento) que se haya terminado.

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

Métodos

Nombre
Delete

Propiedades

Nombre
Application
Orden ascendente
Assignment
CellColor
FieldName
FontBold
FontColor
FontItalic
FontName
FontSize
FontUnderLine
GroupInterval
GroupOn
Índice
Parent
Pattern
StartAt

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.