2017-02-20 5 views
0

Я использую VBA для применения условного форматирования к листу, настройка цвета фона и переднего цвета, если содержание «FALSE»:VBA для настройки условного форматирования только для ячеек с фальшивыми значением

Sub Formatting() 

    Sheets("File").Cells.FormatConditions.Delete 

    With Range("N2:N2000").FormatConditions.Add(_ 
     Type:=xlExpression, _ 
     Formula1:="=$N2=FALSE") 
     .Interior.Color = RGB(255, 239, 239) 
     .Font.Color = RGB(97, 0, 0) 
    End With 
End Sub 

Однако , Пустые ячейки также становятся красными.

Как применять условное форматирование к ячейкам со значением «False»?

ответ

2

Во-первых, убедитесь, что полностью квалифицировать ваш Range("N2:N2000") с Sheets("File").

Во-вторых, если вы хотите применить форматирование только к слову «FALSE», без дополнительных символов внутри ячейки используйте TextOperator:=xlEqual, в противном случае используйте TextOperator:=xlContains.

Код

Option Explicit 

Sub Formatting() 

    With Sheets("File") 
     .Cells.FormatConditions.Delete 

     With .Range("N2:N2000").FormatConditions.Add(_ 
      Type:=xlTextString, String:="FALSE", TextOperator:=xlEqual) 
      .Interior.Color = RGB(255, 239, 239) 
      .Font.Color = RGB(97, 0, 0) 
     End With 
    End With 

End Sub 
2

Try, чтобы соответствовать его как текст:

Type:=xlTextString, String:="FALSE", TextOperator:=xlContains