excel-vba
Formattazione condizionale tramite VBA

Osservazioni

FormatConditions.Add

Sintassi:

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

parametri:

XlFormatConditionType enumaration:

Formattazione per valore della cella:

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

operatori:

Se Type è xlExpression, l'argomento Operator viene ignorato.

La formattazione per testo contiene:

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

operatori:

Formattazione per periodo

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

operatori:

Rimuovi il formato condizionale

Rimuovi tutti i formati condizionali nell'intervallo:

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

Rimuovi tutto il formato condizionale nel foglio di lavoro:

Cells.FormatConditions.Delete

FormatConditions.AddUniqueValues

Evidenziare i valori duplicati

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

Evidenziando i valori unici

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

FormatConditions.AddTop10

Evidenziando i 5 valori principali

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

operatori:

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:

Genere:

Operatore:

Valore:

Restituisce o imposta il valore di soglia per un'icona in un formato condizionale.