条件付き書式

設定

　値で指定

　　以上

With セル.FormatConditions.Add(Type:=xlCellValue, Operator:=xlGreaterEqual, Formula1:=値)
    .Font.Color = 文字色
    .Interior.Color = 背景色
End With

　文字列を含む

With セル.FormatConditions.Add(Type:=xlTextString, TextOperator:=xlContains, String:="文字列")
    .Font.Color = 文字色
    .Interior.Color = 背景色
End With

　条件で指定

With セル.FormatConditions.Add(Type:=xlExpression, Formula1:="= 条件")
    .Font.Color = 文字色
    .Interior.Color = 背景色
End With

削除

セル.FormatConditions.Delete