Как получить цвет из ячейки Использование VBA в Microsoft Excel 2010
В этой статье вы узнаете, как получить цвет ячейки с помощью кода VBA.
Нам нужно выполнить следующие шаги, чтобы запустить редактор VB.
Щелкните вкладку «Разработчик». В группе «Код» выберите Visual Basic
Нажмите «Вставить», а затем «Модуль»
Это создаст новый модуль.
Введите следующий код в модуль
Функция ColorIndex (CellColor As Range)
ColorIndex = CellColor.Interior.ColorIndex
Конечная функция
Чтобы получить цвет ячеек ниже, см. Снимок ниже
В ячейке B2 введите формулу как = ColorIndex (A2), а затем скопируйте формулу в ячейки ниже.
[.underline] # Давайте возьмем еще один пример: # Чтобы узнать, сколько раз конкретный цвет повторялся (подсчитывать по цвету), см. снимок ниже
Мы можем использовать функцию COUNTIF вместе с недавно созданной функцией UDFColorIndex.
===
СЧЁТЕСЛИ: подсчитывает количество ячеек в диапазоне, удовлетворяющем условию.
Синтаксис: = СЧЁТЕСЛИ (диапазон, критерий)
диапазон: он относится к диапазону выбранных ячеек, в котором критерии будут проверять количество найденных элементов.
критерии: критерии определяют, какие ячейки следует подсчитывать.
В ячейке D2 формула будет = СЧЁТЕСЛИ ($ B $ 2: $ B $ 9, ColorIndex (D2))
Скопировав формулу в ячейку E2, мы получим подсчет по цветам.
Так мы можем получить цвет любой клетки.