Excel VBA - Изменить определенное правило условного форматирования

Question

Я пытаюсь настроить таргетинг на определенное правило условного форматирования и изменить диапазон «Применяется к».Правило внутри listobject.

Правило имеет следующее выражение:

=OR(CELL("row")=CELL("row",C13))

Я не знаю, как выбрать конкретное правило условного форматирования, возможно, с помощью функции IF путем поиска всех правил в таблице listobject?

 .FormatConditions.Add xlExpression, xlEqual, "=OR(CELL("row")=CELL("row",C13))"

Затем я мог бы использовать что-то подобное для изменения диапазона?

.FormatConditions(1).ModifyAppliesToRange Range(strRange)

Любая помощь будет высоко ценится.

Answer 1

Я думаю, вам придется пройтись по условиям, чтобы найти те, которые вам нужны:

Set mySheet = ActiveSheet 
For Each fc In mySheet.UsedRange.FormatConditions
    If fc.Formula1 = "=OR(CELL(""row"")=CELL(""row"",C13))" then
        'Modify range here
    End if
Next fc

(это не проверено)