Objeto GroupCriterion2 (Project)

  • Artigo

Representa um critério em uma definição de grupo, onde a hierarquia de grupo pode ser mantida e a cor da célula pode ser um valor hexadecimal. O objeto GroupCriterion2 é um membro da coleção GroupCriteria2.

Exemplo

Usando o objeto GroupCriterion2

Use **GroupCriteria2(**Index), emque Index é o índice de critério, para retornar um único objeto GroupCriterion2 . 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.ResourceGroups2("Standard Rate").GroupCriteria2(1).CellColor = &HFF0000

Usando a coleção GroupCriterion2

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

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

Use o método AddEx para adicionar um objeto GroupCriterion2 à coleção GroupCriteria2, onde CellColor pode ser um valor hexadecimal. O exemplo a seguir adiciona outro critério ao grupo de recurso especificado, agrupando recursos em ordem ascendente conforme determinado pela percentagem de seu trabalho (em incrementos de 25%) que está concluída.

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

Métodos

Nome
Delete

Propriedades

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

Confira também

Modelo de objeto do projeto

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.