Условное форматирование с использованием COUNTIF

Question

Возможно ли в Excel с помощью VBA добавить правило условного форматирования, которое использует формулу: =COUNTIF(A1:B1,"*9.65*")?

Answer 1

VBA делает быстрее то, что вы можете делать вручную, ничего больше (ну, это что-то еще, но это только для экспертов :)).

Ответ на ваш вопрос: да, если вы можете сделать это вручную, иначе.

Вы пытаетесь вручную сделать нужное форматирование, выбрав диапазон и нажав любую кнопку форматирования или выбрав каждую ячейку и применив ее цвет вручную, один за другим. Сделайте это во время записи макроса, и если вы можете сделать это вручную, вы можете сделать функцию VBA, чтобы сделать это за вас быстро.

Записанный макрос, скорее всего, не сработает для вас, но станет хорошей отправной точкой для вашего реального рабочего макроса.

Answer 2

Как указывалось другими, вы можете просто записать макрос, чтобы получить приблизительный код, который вам нужен.

' For this example, the cell references are hard coded. Edit as required. 
Range("D1:D4").Select 
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _ 
    "=COUNTIF(A1:B1,""9.65"")" 
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority 
With Selection.FormatConditions(1).Interior 
    ' This is the style that you apply to each cell. 
    .PatternColorIndex = xlAutomatic 
    .ThemeColor = xlThemeColorAccent6 
    .TintAndShade = 0 
End With 
Selection.FormatConditions(1).StopIfTrue = False