Share via


Objeto IconCriteria (Excel)

Representa la colección de objetos IconCriterion . Cada objeto IconCriterion representa los valores y el tipo de umbral de cada icono de una regla de formato condicional del conjunto de iconos.

Comentarios

La colección IconCriteria se devuelve desde la propiedad IconCriteria del objeto IconSetCondition . Puede obtener acceso a cada objeto IconCriterion de la colección pasando un índice a la colección. Vea el ejemplo para obtener más información.

Ejemplo:

En el ejemplo de código siguiente se crea un intervalo de números que representan las puntuaciones de prueba y, a continuación, se aplica una regla de formato condicional de conjunto de iconos a ese intervalo. El tipo de conjunto de iconos se cambia después de los iconos predeterminados a un conjunto de iconos de cinco flechas. Por último, el tipo de umbral se modifica de percentil a número especificado manualmente.

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 five-arrow icon set 
 cfIconSet.IconSet = ActiveWorkbook.IconSets(xl5Arrows) 
 
 'The IconCriterion collection contains all IconCriteria 
 'By indexing into the collection you can modify each criterion 
 
 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

Propiedades

Vea también

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.