VBA conditional formatting: Cell contains a blank value

[willow1985]

Hi everyone,

I have a VBA code that clears conditional formats and then enters them back in for when fellow employees jumble them up so to speak.

The only conditional format I have issues with is the one that states: Cell contains a blank value. I do not know how to write this in VBA

Here is what I want:

and here is what I get (which does not work):

I do not know how to write the code for Cell contains a blank value.

   With ThisWorkbook.Worksheets("2023")

With .Range("D3:D11010,F3:F11010").FormatConditions
.Add xlExpression, Formula1:="=LEN(TRIM(A2))=0"
.Item(.Count).Interior.PatternColorIndex = xlAutomatic
.Item(.Count).Interior.ThemeColor = xlThemeColorAccent4
.Item(.Count).Interior.TintAndShade = 0.399945066682943
.Item(.Count).StopIfTrue = False
End With

Help with this would be greatly appreciated!

 

[RoryA]

Your formula should refer to row 3 not row 2. Personally I would use:

.Add Type:=xlCellValue, Operator:=xlEqual, Formula1:="="""""

 

[willow1985]

Your formula should refer to row 3 not row 2. Personally I would use:

.Add Type:=xlCellValue, Operator:=xlEqual, Formula1:="="""""

Thank you so much! Works Perfectly!