IconCriteria-Objekt (Excel)

Stellt die Auflistung von IconCriterion-Objekten dar. Jedes IconCriterion-Objekt stellt die Werte und den Schwellenwerttyp für jedes Symbol in einer Regel für die bedingte Formatierung von Symbolen dar.

Hinweise

Die IconCriteria-Auflistung wird von der IconCriteria-Eigenschaft des IconSetCondition-Objekts zurückgegeben. Sie können auf die IconCriterion-Objekte in der Auflistung durch das Übergeben eines Index an die Auflistung zugreifen. Detaillierte Informationen hierzu finden Sie im Beispiel.

Beispiel

Im folgenden Codebeispiel wird ein Zahlenbereich erstellt, der Testergebnisse darstellt, und anschließend wird auf diesen Bereich eine Regel für die bedingte Formatierung von Symbolen angewendet. Der Typ des Symbolsatz wird dann von den Standardsymbolen in einen Symbolsatz mit fünf Pfeilen geändert. Schließlich wird der Schwellenwerttyp vom Perzentil in eine hart codierte Zahl geändert.

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

Eigenschaften

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.