次の方法で共有


IconCriteria インターフェイス

定義

オブジェクトの IconCriterion コレクションを表します。 各 IconCriterion は、アイコン セットの条件付き書式ルール内の各アイコンの値としきい値の種類を表します。

public interface class IconCriteria : System::Collections::IEnumerable
[System.Runtime.InteropServices.Guid("00024498-0000-0000-C000-000000000046")]
[System.Runtime.InteropServices.InterfaceType(2)]
public interface IconCriteria : System.Collections.IEnumerable
Public Interface IconCriteria
Implements IEnumerable
属性
実装

次のコード例は、テストの得点を表す番号の範囲を作成し、アイコン セットの条件付き書式ルールをその範囲に適用します。 アイコン セットの種類は、既定のアイコンセットから 5 つの矢印のアイコン セットに変更されます。 最後に、しきい値の種類が百分位からハードコードされた番号に変更されます。

<span class="label">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</span>

注釈

IconCriteria コレクションは、 オブジェクトの IconCriteriaIconSetCondition プロパティから返されます。 コレクション内の各 IconCriterion オブジェクトへは、コレクションにインデックスを渡すことでアクセスできます。 詳細は使用例を参照してください。

プロパティ

_Default[Object]

内部使用のため予約済みです。

Count

アイコン セットの条件付き書式ルールの条件の数を指定する長整数型 (Long) の値を返します。 読み取り専用です。

Item[Object]

IconCriteria コレクションから 1 つのIconCriterionオブジェクトを返します。 読み取り専用です。

メソッド

GetEnumerator()

オブジェクトの IconCriterion コレクションを表します。 各 IconCriterion は、アイコン セットの条件付き書式ルール内の各アイコンの値としきい値の種類を表します。

適用対象