Share via


Objeto GroupCriterion (Project)

Representa um critério em uma definição de grupo. O objeto GroupCriterion é um membro da coleção GroupCriteria.

Comentários

Para usar grupos onde a hierarquia de grupo pode ser mantida e a cor de célula pode ser um valor hexadecimal, consulte o objeto GroupCriterion2.

Exemplo

Usando o objeto GroupCriterion

Use **GroupCriteria(**Index), emque Index é o índice de critério, para retornar um único objeto GroupCriterion . O exemplo a seguir define a cor de célula para o primeiro critério no grupo de recursos taxa padrão como azul.

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

Usar a coleção GroupCriteria

Use a propriedade GroupCriteria para retornar uma coleção GroupCriteria. O exemplo a seguir exibe uma lista dos campos usados como critérios no grupo de tarefa especificado e mostra se eles são classificados em ordem crescente ou decrescente.

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 o método Add para adicionar um objeto GroupCriterion à coleção GroupCriteria. O exemplo a seguir adiciona outro critério ao grupo de recurso especificado, agrupando recursos em ordem crescente conforme determinado pela porcentagem do seu trabalho (em incrementos de 25 por cento) que está concluída.

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

Métodos

Nome
Delete

Propriedades

Nome
Application
Ordem crescente
Assignment
CellColor
FieldName
FontBold
FontColor
FontItalic
FontName
FontSize
FontUnderLine
GroupInterval
GroupOn
Índice
Responsável
Padrão
StartAt

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.