Excel 2013 и VBA> Подсчитать количество правил условного форматирования на листе

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

Когда вы используете «Управление правилом ...» в Excel, он дает вам крошечное поле со списком всех правил, представленных на листе (при условии, что вы выбрали «Этот рабочий лист» в качестве области действия). Но это не помогает мне определить имеет ли лист пятьдесят правил или тысячу правил, и не помогает количественно оценить риск, связанный с текущим состоянием этого листа.

Следовательно: Как определить количество правил условного форматирования, представленных в электронной таблице Excel?

Связанные с: Существует ли простой способ управления большим количеством правил условного форматирования?

Не уверен, насколько вам удобно с VBA, но вот простой скрипт, который найдет ответ для активной рабочей таблицы и отобразит его в окне сообщения:

Sub CountConditions()
    MsgBox ActiveSheet.Cells.FormatConditions.Count & " Conditional Formatting rule(s) found on the current worksheet."
End Sub

Откройте редактор Visual Basic, либо из разработчик вкладка или с Alt + F11 щелкните правой кнопкой мыши имя вашего файла слева и выберите «Вставить | Модуль, затем вы можете скопировать приведенный выше код в модуль, чтобы создать макрос, который сделает всю работу за вас.

С помощью более сложного кода вы можете добавлять условия для просмотра каждого правила и, возможно, удалять дубликаты и т. Д.