Індекс кольорів Excel VBA
Як і на робочому аркуші, ми змінюємо колір комірки або заданого діапазону комірок на домашній вкладці у VBA. У нас є функція vba, яка називається індексом кольорів, яка використовується для зміни кольорів клітинок або наданого діапазону комірок; ця функція має унікальну ідентифікацію різних типів кольорів.
У VBA у нас є два способи застосування кольору, перший - за допомогою властивості “color”, а другий - за допомогою властивості “ColorIndex”.
Ми застосовуємо колір до комірки як колір фону, ми застосовуємо колір шрифту та застосовуємо колір меж. Отже, щоб отримати доступ до властивості color & index index, нам потрібно спочатку виділити комірку.
Як використовувати властивість Color & Color Index?
Ви можете завантажити цей шаблон індексу кольорів VBA тут - Шаблон індексу кольорів VBA# 1 - Використання властивості кольору
Припустимо, у вас є слово «Привіт» у комірці А1. Ми побачимо, як застосувати колір фону цієї клітинки.
Щоб змінити колір тла, у властивостях кольорів потрібно спочатку згадати діапазон комірки.
Код:
Додатковий колір () Діапазон ("А1") Кінець Під 
Після вибору комірки нам потрібно згадати, що саме нам потрібно робити. Як я вже говорив, нам потрібно змінити внутрішній колір клітини. Тож для зміни кольору тла клітинки використовуйте властивість “Інтер’єр”.
Код:
Додатковий колір () Діапазон ("A1") 
У розділі Властивість інтер’єру ми маємо кілька інших методів та властивостей. Оскільки нам потрібно змінити колір клітинки, використовуйте властивість color.
Код:
Додатковий колір () Діапазон ("A1"). Interior.Color = Кінець Sub 
Тут ми можемо використовувати 8 постійно іменованих кольорів. Нижче наведено список того самого.
vbBlack, vbRed, vbGreen, vbBlue, vbЖовтий, vbMagenta, vbCyan, vbWhiteВиберіть тип кольору відповідно до вашого бажання.
Код:
Додатковий колір () Діапазон ("А1"). Інтер'єр. Колір = vb Синій кінець Під 
Якщо я запустив цей код за допомогою клавіші F5 або вручну, він змінить колір тла комірки A1 на vbBlue.
Таким чином, ви можете використовувати інші постійні іменовані кольори. Спробуйте використати їх для перевірки результату.
Окрім цих 8 постійних кольорів, ми також можемо заповнювати різними кольорами, використовуючи функцію RGB у VBA.
Код:
Додатковий колір () Діапазон ("A1"). Інтер'єр. Колір = RGB (Кінцевий суб 
Нам потрібно ввести суміш червоного, зеленого та синього в цифрах. Щоб використовувати це, вам слід ідеально ввести цифри. Я ввів суміш як RGB (250, 200, 150).
Код:
Додатковий колір () Діапазон ("A1"). Інтер'єр. Колір = RGB (250, 200, 150) Кінець Під 
Зміна цього кольору така.
Проблема в тому, що ви точно не знаєте, яке число має який колір.
Наведений нижче код призначений для зміни кольору шрифту.
Код:
Sub Color_Font () Діапазон ("A1"). Font.Color = RGB (100, 400, 100) Кінець Sub 
Запустіть цей код за допомогою клавіші F5 або вручну, щоб отримати результат.
# 2 - Використання властивості індексу кольорів
Індекс кольорів дещо відрізняється від властивості кольору. У властивості COLOR ми використовуємо 8 постійних кольорів, заданих VBA, а також за допомогою функції RGB створюємо власний колір.
Властивість COLOR INDEX обмежена у VBA, вона може містити значення від 1 до 56. Кожне число від 1 до 56 містить різні кольори. Нижче наведені номери списків та їх відповідні кольори.
Нижче наведено макрокод для зміни кольору тла комірки А1 на рожевий.
Код:
Sub ColorIndex_Cell () Діапазон ("A1"). Interior.ColorIndex = 26 Кінець Sub 
Запустіть цей код вручну або за допомогою клавіші F5, щоб побачити результат.
Нижче наведено макрокод для зміни кольору шрифту комірки А1 на жовтий.
Код:
Sub ColorIndex_Font () Діапазон ("A1"). Font.ColorIndex = 27 Кінець Sub 
Запустіть цей код, використовуючи клавішу F5, або ви можете запустити вручну і побачити результат.
Одне з важливих речей, про яке слід пам’ятати, це те, що ми можемо ввести цифри від 1 до 56. Якщо щось більше 56, ми отримаємо помилку „Індекс поза межами діапазону”.
Ви спостерігали?
Як я вже говорив, властивість Color Index може вставляти лише 56 кольорів, але справа в тому, що вона може вставляти лише 46 унікальних кольорів, і існує 10 копій кольорів. Нижче наведено список повторюваних кольорових кодів.
