Set Cell Colour without using Conditional Formatting

[ejwjohn]

I have been trying to use Conditional Formatting to colour cell and a Forum participant has helped me sort that out, now i have another issue, in that apparently the latest versions of Excel, and perhaps versions will not allow you to Record a Macro which uses Conditional Formatting...... so is there another way to set the background colour of a cell based on the value of the text within that cell please?

Thanks

JohnW

 

[steve the fish]

I just recorded one in Excel 2016. It doesnt like the apply button so just press ok at the end. This is my recorded macro:

Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=A1=""a"""
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .Color = 255
        .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False

 

[ejwjohn]

Hello,

Ok, Thanks. I used your code with a slight variation and it works now i can do the rest of the Conditional Formatting using Macros.

Thanks Again

JohnW