Objeto IconSet (Excel)IconSet object (Excel)

Representa um único conjunto de ícones que são usados na regra de formatação condicional de um conjunto de ícones.Represents a single set of icons that are used in an icon set conditional formatting rule.

ComentáriosRemarks

O objeto IconSet é um objeto filho da coleção IconSets .The IconSet object is a child object of the IconSets collection.

O ícone definido para o formato condicional é atribuído usando a propriedade IconSet do objeto IconSetCondition .The icon set for the conditional format is assigned by using the IconSet property of the IconSetCondition object. Você pode definir essa propriedade para um dos conjuntos de ícone interno, passando uma das constantes da enumeração xlIconSet como um índice da propriedade IconSets do objeto Workbook .You set this property to one of the built-in icon sets by passing one of the constants of the xlIconSet enumeration as an index of the IconSets property of the Workbook object. Consulte o exemplo para obter detalhes.See the example for details.

ExemploExample

O exemplo de código a seguir cria um intervalo de números que representam as pontuações de teste e aplica uma regra de formatação condicional do conjunto de ícones para aquele intervalo.The following code example creates a range of numbers representing test scores and then applies an icon set conditional formatting rule to that range. O tipo de conjunto de ícones, em seguida, é alterado de ícones padrão para um conjunto de ícones de seta 5.The type of icon set is then changed from the default icons to a 5-arrow icon set. Finalmente, o tipo de limite é modificado de percentil para um número codificadas.Finally, the threshold type is modified from percentile to a hard-coded number.

Sub CreateIconSetCF() 
 
 Dim cfIconSet As IconSetCondition 
 
 'Fill cells with sample data from 1 to 10 
 With ActiveSheet 
 .Range("C1") = 55 
 .Range("C2") = 92 
 .Range("C3") = 88 
 .Range("C4") = 77 
 .Range("C5") = 66 
 .Range("C6") = 93 
 .Range("C7") = 76 
 .Range("C8") = 80 
 .Range("C9") = 79 
 .Range("C10") = 83 
 .Range("C11") = 66 
 .Range("C12") = 74 
 End With 
 
 Range("C1:C12").Select 
 
 'Create an icon set conditional format for the created sample data range 
 Set cfIconSet = Selection.FormatConditions.AddIconSetCondition 
 
 'Change the icon set to a 5-arrow icon set 
 cfIconSet.IconSet = ActiveWorkbook.IconSets(xl5Arrows) 
 
 'The IconCriterion collection contains all of IconCriteria 
 'By indexing into the collection you can modify each criteria 
 
 With cfIconSet.IconCriteria(1) 
 .Type = xlConditionValueNumber 
 .Value = 0 
 .Operator = 7 
 End With 
 With cfIconSet.IconCriteria(2) 
 .Type = xlConditionValueNumber 
 .Value = 60 
 .Operator = 7 
 End With 
 With cfIconSet.IconCriteria(3) 
 .Type = xlConditionValueNumber 
 .Value = 70 
 .Operator = 7 
 End With 
 With cfIconSet.IconCriteria(4) 
 .Type = xlConditionValueNumber 
 .Value = 80 
 .Operator = 7 
 End With 
 With cfIconSet.IconCriteria(5) 
 .Type = xlConditionValueNumber 
 .Value = 90 
 .Operator = 7 
 End With 
 
End Sub

Confira tambémSee also

Referência do modelo de objeto do ExcelExcel Object Model Reference