creates the formatting shown in column A : FormatConditions « Excel « VBA / Excel / Access / Word






creates the formatting shown in column A

 
Sub HighlightFirstUnique()
    With Range("A1:A15")
        .Select
        .FormatConditions.Delete
        .FormatConditions.Add Type:=xlExpression, Formula1:="=COUNTIF(A$1:A1,A1)=1"
        .FormatConditions(1).Interior.Color = RGB(255, 0, 0)
    End With
End Sub

 








Related examples in the same category

1.all the ranges that have conditional formatting set up
2.Setting Up Conditional Formats in VBA
3.Identifying Row with Largest Value in G
4.generates a three-color color scale in range A1:A10:
5.Specifying an Icon Set
6.Specifying Ranges for Each Icon
7.Using Two Colors of Data Bars in a Range
8.Add Crazy Icons
9.highlight cells above average:
10.highlight cells below average:
11.Formatting Cells in the Top 10
12.Formatting Cells in the Bottom 5
13.Formatting Cells in the Top 2 percent
14.Formatting Duplicate Cells
15.Formatting Unique Cells
16.Formatting Cells whose value between 10 and 20
17.highlights all cells that contain a capital letter A
18.highlights all dates in the past week:
19.Highlight the Entire Row for the Largest Sales Value
20.Using the New NumberFormat Property