Цветовой индекс Excel VBA
Как и на листе, мы меняем цвет ячейки или заданного диапазона ячеек на главной вкладке в VBA. У нас есть функция vba, называемая Color Index, которая используется для изменения цветов ячеек или предоставленного диапазона ячеек, эта функция имеет уникальную идентификацию для разных типов цветов.
В VBA есть два способа применения цвета: первый - с помощью свойства «color», а второй - с помощью свойства «ColorIndex».
Мы применяем цвет к ячейке в качестве цвета фона, мы применяем цвет шрифта и применяем цвет границы. Итак, чтобы получить доступ к свойству цвета и индекса цвета, нам нужно сначала выбрать ячейку.
Как использовать свойство Color & Color Index?
Вы можете скачать этот шаблон цветового индекса VBA здесь - шаблон цветового индекса VBA# 1 - Использование свойства цвета
Предположим, у вас есть слово «Привет» в ячейке A1. Мы увидим, как применить цвет фона этой ячейки.
Чтобы изменить цвет фона, в свойствах цветов нам нужно сначала указать диапазон ячейки.
Код:
Дополнительный цвет () Диапазон ("A1") Конец дополнительного
После выбора ячейки нам нужно упомянуть, что нам нужно сделать. Как я уже сказал, нам нужно изменить внутренний цвет ячейки. Итак, чтобы изменить цвет фона ячейки, используйте свойство «Интерьер».
Код:
Дополнительный цвет () Диапазон ("A1"). Внутренний конец Sub
В разделе Свойство интерьера у нас есть несколько других методов и свойств. Поскольку нам нужно изменить цвет ячейки, используйте свойство color.
Код:
Дополнительный цвет () Диапазон ("A1"). Interior.Color = End Sub
Здесь мы можем использовать 8 постоянно именованных цветов. Ниже приводится список того же.
vbBlack, vbRed, vbGreen, vbBlue, vbYellow, vbMagenta, vbCyan, vbWhiteВыберите тип цвета по своему желанию.
Код:
Sub Color () Диапазон ("A1"). Interior.Color = vbBlue End Sub
Если я запустил этот код с помощью клавиши F5 или вручную, он изменит цвет фона ячейки A1 на vbBlue.
Таким образом, вы можете использовать другие постоянные именованные цвета. Попробуйте использовать их, чтобы проверить результат.
Помимо этих 8 постоянных цветов, мы также можем заливать разными цветами, используя функцию RGB в VBA.
Код:
Дополнительный цвет () Диапазон ("A1"). Interior.Color = RGB (End Sub
Нам нужно ввести цифрами смесь красного, зеленого и синего цветов. Чтобы использовать это, вы должны уметь правильно вводить числа. Я ввел смесь как RGB (250, 200, 150).
Код:
Дополнительный цвет () Диапазон ("A1"). Interior.Color = RGB (250, 200, 150) End Sub
Изменение этого цвета происходит так.
Проблема здесь в том, что вы точно не знаете, какое число какого цвета.
Приведенный ниже код предназначен для изменения цвета шрифта.
Код:
Sub Color_Font () Диапазон ("A1"). Font.Color = RGB (100, 400, 100) End Sub
Запустите этот код с помощью клавиши F5 или вручную, чтобы получить результат.
# 2 - Использование свойства индекса цвета
Color Index немного отличается от свойства color. В свойстве COLOR мы используем 8 постоянных цветов, заданных VBA, а также используя функцию RGB, мы создаем свой собственный цвет.
Свойство COLOR INDEX ограничено в VBA, оно может содержать значения от 1 до 56. Каждое число от 1 до 56 содержит разные цвета. Ниже приведены номера списков и их соответствующие цвета.
Ниже приведен код макроса для изменения цвета фона ячейки A1 на розовый.
Код:
Sub ColorIndex_Cell () Диапазон ("A1"). Interior.ColorIndex = 26 End Sub
Запустите этот код вручную или с помощью клавиши F5, чтобы увидеть результат.
Ниже приведен код макроса для изменения цвета шрифта ячейки A1 на желтый.
Код:
Sub ColorIndex_Font () Диапазон ("A1"). Font.ColorIndex = 27 End Sub
Запустите этот код с помощью клавиши F5 или вы можете запустить его вручную и посмотреть результат.
Здесь важно помнить, что мы можем вводить числа от 1 до 56. Если значение больше 56, мы получим ошибку «Индекс вне допустимого диапазона».
Вы заметили?
Как я уже сказал, свойство Color Index может вставлять только 56 цветов, но факт в том, что оно может вставлять только 46 уникальных цветов и есть 10 повторяющихся цветов. Ниже приведен список повторяющихся цветовых кодов.