共用方式為

Excel) (IconSetCondition 物件

  • 發行項

代表圖示集設定格式化條件規則。

註解

所有條件式格式化物件都包含在 FormatConditions 集合物件內，該集合物件是 Range 集合的子系。

您可以使用FormatConditions集合的Add方法或AddIconSetCondition方法來建立圖示集格式化規則。

每個圖示集包含三個、四個或五個圖示。 您可以使用Workbook物件的IconSets屬性來傳回IconSets物件，以指定其中一個內建圖示集。 圖示集中的每個個別圖示接著會由 IconCriteria 物件的成員指派給範圍值的子集。 閾值類型也是由此物件指定。

範例

下列程式碼範例會建立代表測試分數的數位範圍，然後將圖示集條件式格式化規則套用至該範圍。 接著圖示集的類型便會從預設圖示變成五個箭頭的圖示集。 最後再將閾值類型從百分位數改成硬式編碼數字。

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(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

方法

屬性

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。