IconCriterion Interface
Represents the criterion for an individual icon in an icon set. The criterion specifies the range of values and the threshold type associated with the icon in an icon set conditional formatting rule.
Namespace: Microsoft.Office.Interop.Excel
Assembly: Microsoft.Office.Interop.Excel (in Microsoft.Office.Interop.Excel.dll)
Syntax
'Declaration
<InterfaceTypeAttribute()> _
<GuidAttribute("00024499-0000-0000-C000-000000000046")> _
Public Interface IconCriterion
'Usage
Dim instance As IconCriterion
[InterfaceTypeAttribute()]
[GuidAttribute("00024499-0000-0000-C000-000000000046")]
public interface IconCriterion
Remarks
All of the criteria for an icon set conditional format are contained in an IconCriteria collection. You can access each IconCriterion object in the collection by passing an index into the collection. See the example for details.
Examples
The following code example creates a range of numbers representing test scores and then applies an icon set conditional formatting rule to that range. The type of icon set is then changed from the default icons to a five-arrow icon set. Finally, the threshold type is modified from percentile to a hard-coded number.
Sub CreateIconSetCF() Dim cfIconSet As IconSetCondition 'Fill cells with sample data 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(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