Як встановити колір клітинки Excel відповідно до умови за допомогою VBA?

Останнє оновлення: серпень 2021 р.; Microsoft Excel 365, 2019, 2016.

У сьогоднішньому підручнику з автоматизації VBA для Excel ми дізнаємося, як можна програмно змінити колір комірки на основі значення комірки.

Ми можемо використовувати цю техніку, наприклад, при розробці простої інформаційної панелі стану.

Налаштування

Якщо ви ще не розробляєте в Excel, ми рекомендуємо ознайомитися з нашим вступним посібником із макросів Excel . Зокрема, вам потрібно переконатися, що вкладка «Розробник» доступна на стрічці Microsoft Excel, оскільки ви будете використовувати її для написання простого коду.

  • Відкрийте Microsoft Excel. Зауважте, що код, наданий у цьому посібнику, як очікується, працюватиме в Excel 2007 і далі.
  • У порожній аркуш додайте таку таблицю:

Як встановити колір клітинки Excel відповідно до умови за допомогою VBA?

  • Тепер визначте іменований діапазон, натиснувши: Формули>>Визначити назву

Як встановити колір клітинки Excel відповідно до умови за допомогою VBA?

  • Натисніть ОК

Зміна кольору внутрішньої комірки на основі значення за допомогою Cell.Interior.Color

  • Натисніть запис розробника на стрічці.
  • Натисніть Visual Basic або Alt+F11, щоб відкрити редактор VBA для розробників.
  • Далі виділіть робочий аркуш, на якому ви хочете запустити свій код. Або виберіть модуль, у якому є ваш код VBA.
  • Вставте цей код. У нашому прикладі ми змінимо внутрішній колір діапазону комірок на певні значення RGB клітинки, що відповідають червоному, жовтому та зеленому кольорам.
  • Зокрема, ми використовуємо метод Excel VBA Cell.Interior.Color і передаємо відповідне значення RGB або індекс кольору.
Sub Color_Cell_Condition()

Dim MyCell As Range
Dim StatValue As String
Dim StatusRange As Range

Set StatusRange = Range("Status")

For Each MyCell In StatusRange

StatValue = MyCell.Value
Select Case StatValue

    Case "Progressing"
    MyCell.Interior.Color = RGB(0, 255, 0)
    
    Case "Pending Feedback"
    MyCell.Interior.Color = RGB(255, 255, 0)
    
    Case "Stuck"
    MyCell.Interior.Color = RGB(255, 0, 0)

End Select

Next MyCell

End Sub
  • Запустіть свій код – натиснувши F5 або Виконати>> Виконати підпорядковану форму / форму користувача.
  • Ви помітите, що інформаційна панель стану заповнена, як показано нижче:

Як встановити колір клітинки Excel відповідно до умови за допомогою VBA?

  • Збережіть код і закрийте редактор VBA.

Залишити коментар

Безкоштовний шаблон Excel для обліку витрат і доходів від орендної нерухомості: Посібник для початківців

Безкоштовний шаблон Excel для обліку витрат і доходів від орендної нерухомості: Посібник для початківців

Використовуйте безкоштовний трекер орендної нерухомості в Excel для організації доходів, витрат, об’єктів нерухомості та щомісячного грошового потоку. Дізнайтеся, що записувати, як налаштувати шаблон і яких помилок уникати.

Безкоштовний шаблон презентації звіту про статус проєкту для Agile-команд: що варто включити?

Безкоштовний шаблон презентації звіту про статус проєкту для Agile-команд: що варто включити?

Використовуйте цей безкоштовний готовий до копіювання шаблон презентації звіту про статус Agile-проєкту, щоб демонструвати прогрес, ризики, рішення та наступні кроки, не перетворюючи оновлення на шум.

Як виправити проблему «Не працює звук під час запису екрана в PowerPoint»

Як виправити проблему «Не працює звук під час запису екрана в PowerPoint»

Запис екрана в PowerPoint має відео, але немає звуку? Перевірте керування звуком, доступ до мікрофона в Windows, налаштування вводу, сумісність відтворення, оновлення та відновлення.

Безкоштовний шаблон графіка змін для працівників у Excel із калькулятором годин

Безкоштовний шаблон графіка змін для працівників у Excel із калькулятором годин

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

Безкоштовний шаблон рахунку-фактури для малого бізнесу в Excel з автоматичним розрахунком податку з продажів

Безкоштовний шаблон рахунку-фактури для малого бізнесу в Excel з автоматичним розрахунком податку з продажів

Створіть безкоштовний шаблон рахунку-фактури в Excel, який автоматично розраховує оподатковувані суми, податок з продажів та загальні підсумки. Порівняйте варіанти налаштування з єдиною ставкою, таблицею пошуку та ставкою для кожного рядка, і дізнайтеся, коли можливостей Excel вже недостатньо.

Як конвертувати PDF у редагований Word без втрати форматування

Як конвертувати PDF у редагований Word без втрати форматування

Конвертуйте PDF у редагований Word з мінімальною втратою форматування, використовуючи Word або Acrobat. Дізнайтеся, коли працює пряма конвертація, коли потрібен OCR, і як відновити таблиці, шрифти та розриви сторінок.

Шаблон кошторису будівельних робіт для друку в Excel для малих підрядників

Шаблон кошторису будівельних робіт для друку в Excel для малих підрядників

Створіть друкований кошторис будівельних робіт в Excel із зазначенням обсягу робіт, матеріалів, праці, накладних витрат, резерву, націнки, податку та підсумків для друку — плюс формули та помилки, яких слід уникати.

Як створити просту систему відстеження лідів в Excel перед покупкою CRM

Як створити просту систему відстеження лідів в Excel перед покупкою CRM

Побудуйте практичний трекер лідів в Excel з таблицею, випадаючими списками етапів, датами наступних контактів, прапорцями прострочених завдань, фільтрами та простим підсумком воронки продажів — а також ознаки того, що час переходити на CRM.

Роздруковуваний шаблон щоденного блокування часу у форматі PDF для фахівців, які працюють з дому: посібник для початківців

Роздруковуваний шаблон щоденного блокування часу у форматі PDF для фахівців, які працюють з дому: посібник для початківців

Дізнайтеся, як використовувати роздруковуваний шаблон щоденного блокування часу у форматі PDF для роботи з дому: плануйте блоки концентрації, зустрічі, перерви, буферні зони та правильно роздруковуйте його.

HubSpot Free CRM проти Zoho CRM для самостійних агентів з нерухомості: що краще у 2026 році?

HubSpot Free CRM проти Zoho CRM для самостійних агентів з нерухомості: що краще у 2026 році?

Порівняння HubSpot Free CRM та Zoho CRM для самостійних агентів з нерухомості: контакти, електронна пошта, воронки продажів, налаштування, автоматизація, мобільне використання та компроміси при переході на платні тарифи.