excel-vba
Formatowanie warunkowe przy użyciu VBA

Uwagi

FormatConditions.Add

Składnia:

FormatConditions.Add(Type, Operator, Formula1, Formula2)

Parametry:

Enumaration XlFormatConditionType:

Formatowanie według wartości komórki:

With Range("A1").FormatConditions.Add(xlCellValue, xlGreater, "=100")
    With .Font
        .Bold = True
        .ColorIndex = 3
     End With
End With

Operatorzy:

Jeśli Typ to xlExpression, argument Operator jest ignorowany.

Formatowanie przez tekst zawiera:

With Range("a1:a10").FormatConditions.Add(xlTextString, TextOperator:=xlContains, String:="egg")
    With .Font
        .Bold = True
        .ColorIndex = 3
    End With
End With

Operatorzy:

Formatowanie według okresu

With Range("a1:a10").FormatConditions.Add(xlTimePeriod, DateOperator:=xlToday)
    With .Font
        .Bold = True
        .ColorIndex = 3
    End With
End With

Operatorzy:

Usuń format warunkowy

Usuń cały format warunkowy z zakresu:

Range("A1:A10").FormatConditions.Delete

Usuń cały format warunkowy z arkusza roboczego:

Cells.FormatConditions.Delete

FormatConditions.AddUniqueValues

Podświetlanie zduplikowanych wartości

With Range("E1:E100").FormatConditions.AddUniqueValues
   .DupeUnique = xlDuplicate
   With .Font
       .Bold = True
       .ColorIndex = 3
   End With
End With

Podkreślanie unikalnych wartości

With Range("E1:E100").FormatConditions.AddUniqueValues
   With .Font
       .Bold = True
       .ColorIndex = 3
   End With
End With

FormatConditions.AddTop10

Podkreślając 5 najważniejszych wartości

With Range("E1:E100").FormatConditions.AddTop10
    .TopBottom = xlTop10Top
    .Rank = 5
    .Percent = False
    With .Font
        .Bold = True
        .ColorIndex = 3
    End With
End With

FormatConditions.AddAboveAverage

With Range("E1:E100").FormatConditions.AddAboveAverage
    .AboveBelow = xlAboveAverage
    With .Font
        .Bold = True
        .ColorIndex = 3
    End With
End With

Operatorzy:

FormatConditions.AddIconSetCondition

Range("a1:a10").FormatConditions.AddIconSetCondition
With Selection.FormatConditions(1)
    .ReverseOrder = False
    .ShowIconOnly = False
    .IconSet = ActiveWorkbook.IconSets(xl3Arrows)
End With

With Selection.FormatConditions(1).IconCriteria(2)
    .Type = xlConditionValuePercent
    .Value = 33
    .Operator = 7
End With

With Selection.FormatConditions(1).IconCriteria(3)
    .Type = xlConditionValuePercent
    .Value = 67
    .Operator = 7
End With

IconSet:

Rodzaj:

Operator:

Wartość:

Zwraca lub ustawia wartość progową dla ikony w formacie warunkowym.