Nota
O acesso a esta página requer autorização. Podes tentar iniciar sessão ou mudar de diretório.
O acesso a esta página requer autorização. Podes tentar mudar de diretório.
Retorna ou especifica o ícone de um critério em uma regra de formatação condicional de conjunto de ícones. Leitura/gravação.
Sintaxe
expressão. Ícone
expressão Uma variável que representa um objeto IconCriterion .
Comentários
Depois de definir a propriedade Ícone para o critério do ícone numa regra de formatação condicional de conjunto de ícones, a propriedade IconSet do objeto IconSetCondition é alterada para xlCustomSet.
Exemplo
O exemplo de código seguinte cria uma regra de formatação condicional de conjunto de ícones que apresenta quatro ícones divididos entre as percentagens especificadas. O conjunto de ícones inicialmente é definido para que use o conjunto de ícones 4 Setas (Coloridas), mas a propriedade Icon é usada para substituir quais ícones são usados para o primeiro e terceiro critérios.
Depois de executar o código, o ícone do primeiro critério é o ícone da Cruz Vermelha , o ícone do segundo critério é a segunda seta do conjunto de ícones 4 Setas (Coloridas ), o ícone do terceiro critério é o ícone Semáforo Amarelo e o ícone do quarto critério é a quarta seta do conjunto de ícones de 4 Setas (Coloridas ).
Range("A1:A10").Select
Selection.FormatConditions.AddIconSetCondition
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1)
.ReverseOrder = False
.ShowIconOnly = False
.IconSet = ActiveWorkbook.IconSets(xl4Arrows)
End With
With Selection.FormatConditions(1).IconCriteria(1)
.Icon = xlIconRedCross
End With
With Selection.FormatConditions(1).IconCriteria(2)
.Type = xlConditionValuePercent
.Value = 25
.Operator = 7
End With
With Selection.FormatConditions(1).IconCriteria(3)
.Type = xlConditionValuePercent
.Value = 50
.Operator = 7
.Icon = xlIconYellowTrafficLight
End With
With Selection.FormatConditions(1).IconCriteria(4)
.Type = xlConditionValuePercent
.Value = 75
.Operator = 7
End With
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.