Как сделать заливку в excel?

Здравствуйте, уважаемые читатели. Один из способов расставить акценты в вашей таблице – это выделение цветом. Для Эксель выделение цветом — одна из простейших задач. Вы можете разукрашивать фон клетки, задавать цвет текста, или его части. Это может стать логическим продолжением форматирования текста. В Excel цвет ячейки можно установить такими способами:

1. С помощью ленточных команд Главная – Шрифт – Цвет заливки и Главная – Шрифт – Цвет текста. При нажатии на одну из этих кнопок, открывается для выбора палитра цветов. Рекомендую вам использовать варианты в группах Цвета темы. Если выбрать Другие цвета — откроется палитра выбора произвольного цвета.
   Настройка цвета на ленте Эксель
2. Такие же иконки доступны на мини-панели Эксель, которая открывается вместе с контекстным меню после нажатия правой кнопкой мыши
   Настройка цвета на мини-панели Эксель
3. Цвет текста и фона ячейки можно изменить в окне Формат ячеек. Откройте его любым способом (например, нажмите Ctrl+1) и на вкладке Шрифт найдите пункт Цвет, с помощью которого можно разукрасить текст. На вкладке Заливка выберите каким цветом залить фон клетки.

Настройка цвета в окне «Формат ячеек»

Как добавить фон Excel

Если вы хотите установить фоновую картинку на лист, выполните: Разметка страницы – Параметры страницы – Подложка. Откроется окно для добавления картинки. Вы можете выбрать файл с компьютера, либо найти в сети.

Настройка подложки в Эксель

Выбранный рисунок замостит весь рабочий лист Эксель. Чтобы удалить фоновый рисунок – выполните команду Разметка страницы – Параметры страницы – Удалить фон.

По моему мнению, подложка – не такой уж и полезный объект, можно обойтись без нее. Использование графического фона может существенно увеличить объём файла и замедлить работу программы. К тому же, подложка не выводится на печать.

Границы ячеек в Excel

Границы позволяют визуально группировать ячейки в логические группы и разделять разные клетки при печати. Чтобы задать границы для ячеек – выделите их выполните одну из приведенных инструкций:

1. На ленте Главная – Шрифт найдите комбинированную команду Границы. Нажмите на стрелку Вниз и выберите один из тринадцати предложенных вариантов обводки. В этом же меню можно выбрать вид и цвет линии, а, так же, нарисовать границы вручную, как будто карандашом
   Настройка границ ячеек в Эксель
2. Сделайте левый клик мышью на выделенном диапазоне, откроется контекстное меню и мини-панель. Последняя содержит кнопку Границы, аналогичную той, которая есть на ленте
   Настройка границ на мини-панели Excel
3. Используйте окно Формат ячеек. Нажмите Ctrl+1 и перейдите на вкладку Граница. В открывшемся окне будет много кнопок управления с рисунками, поясняющими их назначение. Просто нажимайте на кнопки, соответствующие нужному формату. Эксель отобразит для вас пример ячейки с выбранным вами форматом.
   Настройка обводки в окне «Формат ячеек»

Удобное в Excel — стиль ячеек

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

Если вы стилизуете несколько ячеек, а потом измените параметры стиля – все клетки отобразят эти изменения. Вот главное преимущество инструмента «Стиль», вам не нужно изменять каждую ячейку отдельно.

Чтобы применить к ячейкам определённый стиль – выделите их. Найдите и выполните команду Главная – Стили – Стили ячеек. Откроется окно стилей, в котором вы можете выбрать один из сохранённых стилей. При наведении на каждый вариант, к ячейке временно будет применено это форматирование. Чтобы подтвердить применение стиля – кликните мышью по иконке стиля.

Применение стилей в Эксель

Чтобы изменить стиль – нажмите правой кнопкой мыши на его миниатюре в библиотеке стилей (Главная – Стили – Стили ячеек). В контекстном меню выберите Изменить.

В открывшемся диалоговом окне «Стиль» установите галочки возле нужных типов форматирования, нажмите Формат…, чтобы настроить стиль в окне Формат ячеек. После этого нажмите ОК, настройки стиля будут обновлены.

Все ячейки, для которых применен этот стиль, изменят свой внешний вид в соответствии с проделанными вами изменениями.

Изменение стиля в Эксель

Для создания нового стиля, выполните Главная – Стили – Стили ячеек – Создать стиль ячейки. Откроется окно Стиль, заполните название новой настройки, отметьте галочками параметры для применения в стиле. Нажмите Формат… и в окне Формат ячеек настройте вид клетки для нового стиля. Нажмите ОК, созданная настройка появится в библиотеке.

Как скопировать стиль из другой книги

Пользовательские стили доступны только в той рабочей книге, где были созданы. Чтобы перенести настройку из одной книги в другую, выполните такую последовательность:

1. Откройте книгу. в которую нужно перенести стиль и ту книгу, из которых будете делать перенос.
2. Активируйте книгу, в которую копируете стиль и выполните Главная – Стили – Стили ячеек – Объединить стили
3. В открывшемся окне выберите книгу, из которой нужно перенести правила форматирования и нажмите ОК. Новые, не совпадающие стили будут перенесены и доступны для использования

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

В этом посте мы рассмотрели интересные и важные способы форматирования ячеек, но далеко не все. В следующем посте я расскажу о применении тем. Не сомневайтесь, будет интересно и очень полезно! Жду Вас с нетерпением!

Источник: https://officelegko.com/2015/11/26/dobavlyaem-krasok-v-yacheyki-excel/

Как сделать заливку в Excel — Офис Ассист

У вас есть таблица в Экселе, которую не очень неудобно читать из-за одномерного белого фона?

Вам хотелось бы раскрасить таблицу так, чтобы чётные и нечётные строки визуально выделялись, например, все чётные — зеленым цветом?

Тогда вы попали по адресу. И в процессе изучения статьи вы узнаете универсальный способ делать таблицы полосатыми. Он будет работать с любой версией Excel.

Итак, приготовьте вашу собственную таблицу и поехали!

Для заливки ячеек мы воспользуемся универсальной формулой Экселя — условное форматирование. Она есть у всех версий Excel.

Пример будет на основе Excel 2007. Если у вас версия выше — делайте по аналогии, суть та же самая.

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

На вкладке Главная нажимаем Условное форматирование, и затем Создать правило…

В окне Создание правила форматирования выделяете мышкой тип правила: Использовать формулу для определения форматируемых ячеек.

Затем переходите к полю ввода и вводите (или скопируйте/вставьте) следующую формулу:

=ОСТАТ(СТРОКА(A2);2)=0

где функция СТРОКА берет самую первую ячейку выделения и вычисляет ее номер, а функция ОСТАТ берет результат и делит его на 2 (для конкретно нашего примера). Если после деления имеется остаток, то ячейка пропускается, а если остаток равен нулю, то ячейка форматируется по выбранным нами условиям.

• Если хотите выделить каждую 3ю или 7ю ячейку, то в формулу вместо двух, подставляете либо 3 либо 7. То есть, =ОСТАТ(СТРОКА(A2);3)=0 или =ОСТАТ(СТРОКА(A2);7)=0
• Примечание: для тех, у кого английская версия Офиса, формула будет такая:
• =MOD(ROW(A2);2)=0

Дальнейший этап — определяем форматирование ячеек. Нажимаете на кнопку Формат…, как на скриншоте выше и переходим в окно Формат ячеек. При желании здесь вы можете проявить свое творческое начало и оторваться по полной программе, например, сделать шрифт курсивом или жирным. Но сейчас давайте раскрасим таблицу зелеными полосками, как и планировали.

Переходим во вкладку Заливка, выбираем нужный цвет с подходящей степенью зеленоватости и жмем ОК.

Остался финальный шаг. Мы вернулись к окошку, где вписывали формулу. Теперь внизу в поле Образец отображается предварительный просмотр ячейки, какой она станет через несколько секунд. Нажимаем ОК.

И вот оно, наше «полосатое» счастье;)

Как видите, не так уж сложно сделать таблицу полосатой и удобной для чтения. Достаточно один раз разобраться, как это делать. И с каждым разом вы будет делать это быстрее и достигнете автоматизма. А ваши друзья и коллеги будут в шоке, увидев как вы играючи управляетесь с Экселем;)

Удалось ли вам раскрасить таблицу?

Хочу еще почитать:

Источник: http://officeassist.ru/excel/kak-sdelat-zalivku-v-excel/

Выделение строк таблицы в MS EXCEL в зависимости от условия в ячейке

Если значение в ячейке удовлетворяет определенному пользователем условию, то с помощью Условного форматирования можно выделить эту ячейку (например, изменить ее фон). В этой статье пойдем дальше — будем выделять всю строку таблицы, содержащую эту ячейку.

Пусть в диапазоне А6:С16 имеется таблица с перечнем работ, сроками выполнения и статусом их завершения (см. файл примера).

Задача1 — текстовые значения

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

Решение1

Создадим небольшую табличку со статусами работ в диапазоне Е6:Е9.

Выделим диапазон ячеек А7:С17, содержащий перечень работ, и установим через меню фон заливки красный (предполагаем, что все работы изначально находятся в статусе Не начата).

Убедимся, что выделен диапазон ячеек А7:С17 (А7 должна быть активной ячейкой). Вызовем команду меню .

• в поле «Форматировать значения, для которых следующая формула является истинной» нужно ввести =$C7=$E$8 (в ячейке Е8 находится значение В работе). Обратите внимание на использоване смешанных ссылок;
• нажать кнопку Формат;
• выбрать вкладку Заливка;
• выбрать серый цвет;
• Нажать ОК.

ВНИМАНИЕ: Еще раз обращаю внимание на формулу =$C7=$E$8. Обычно пользователи вводят =$C$7=$E$8, т.е. вводят лишний символ доллара.

Нужно проделать аналогичные действия для выделения работ в статусе Завершена. Формула в этом случае будет выглядеть как =$C7=$E$9, а цвет заливки установите зеленый.

В итоге наша таблица примет следующий вид.

Примечание: Условное форматирование перекрывает обычный формат ячеек. Поэтому, если работа в статусе Завершена, то она будет выкрашена в зеленый цвет, не смотря на то, что ранее мы установили красный фон через меню .

Как это работает?

В файле примера для пояснения работы механизма выделения строк, создана дополнительная таблица с формулой =$C7=$E$9 из правила Условного форматирования для зеленого цвета. Формула введена в верхнюю левую ячейку и скопирована вниз и вправо.

Как видно из рисунка, в строках таблицы, которые выделены зеленым цветом, формула возвращает значение ИСТИНА. 

В формуле использована относительная ссылка на строку ($C7, перед номером строки нет знака $).

Отсутствие знака $ перед номером строки приводит к тому, что при копировании формулы вниз на 1 строку она изменяется на =$C8=$E$9, затем на =$C9=$E$9, потом на =$C10=$E$9 и т.д. до конца таблицы (см.

ячейки G8, G9, G10 и т.д.). При копировании формулы вправо или влево по столбцам, изменения формулы не происходит, именно поэтому цветом выделяется вся строка.

В случае затруднений можно потренироваться на примерах, приведенных в статье Условное форматирование в MS EXCEL.

Прием с дополнительной таблицей можно применять для тестирования любых формул Условного форматирования.

Рекомендации

При вводе статуса работ важно не допустить опечатку. Если вместо слово Завершена, например, пользователь введет Завершено, то Условное форматирование не сработает.

Чтобы исключить некорректный ввод используйте идеи из статьи Ввод данных из списка значений. Часть1. Выпадающий список. В файле примера для ввода статусов работ использован аналогичный Выпадающий список.

Чтобы быстро расширить правила Условного форматирования на новую строку в таблице, выделите ячейки новой строки (А17:С17) и нажмите сочетание клавиш CTRL+D. Правила Условного форматирования будут скопированы в строку 17 таблицы.

Задача2 — Даты

Предположим, что ведется журнал посещения сотрудниками научных конференций (см. файл примера лист Даты).

Источник: https://excel2.ru/articles/vydelenie-strok-tablicy-v-ms-excel-v-zavisimosti-ot-usloviya-v-yacheyke

Полосатая заливка строк таблицы "зеброй"

26263 23.10.2012 Скачать пример

Полосатая заливка «зеброй» — весьма популярный и удобный для просмотра вид оформления таблиц:

В Excel есть несколько способов быстрого создания такого дизайна:

Способ 1. Форматировать как таблицу

Это способ подойдет только тем, у кого последние версии Excel — 2007 или новее. Выделите ваш диапазон с данными и нажмите кнопку Форматировать как таблицу (Format as Table) на вкладке Главная (Home):

Откровенно говоря, этот способ гораздо глубже, чем кажется на первый взгляд, ибо здесь форматирование — только побочный эффект. О настоящих последствиях превращения диапазона в Таблицу можно почитать здесь.

Способ 2. Автоформат

В Excel 2003 и старше можно использовать встроенные шаблоны полосатой заливки. Для этого выделить все ячейки таблицы и выберите в меню Формат — Автоформат (Format — AutoFormat). Там есть несколько готовых форматов с похожими полосками.

Способ 3. Универсальный. Условное форматирование

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

Выделите ячейки таблицы (кроме «шапки»), затем:

• в Excel 2003 и старше — откройте меню Формат — Условное форматирование (Format — Conditional Formatting), выберите в раскрывающемся списке вариант Формула (Formula) вместо Значение (Value)
• в Excel 2007 и новее — нажмите кнопку Условное форматирование (Conditional Formatting) на вкладке Главная (Home) и выберите Создать правило (New Rule), затем в открывшемся окне задайте последний тип правила Использовать формулу для определения форматируемых ячеек (Use a formula to determine which cells to format)

В появившееся поле впишите следующую формулу:

=ОСТАТ(СТРОКА(A2);2)=0 или в английской версии  =MOD(ROW(A2);2)=0 

Эта формула берет номер текущей строки (функция СТРОКА, а A2 — первая ячейка выделения), делит его на 2 и проверяет остаток от деления (функция ОСТАТ). Если он равен нулю, т.е.

номер строки четный, то происходит форматирование ячейки (не забудьте нажать кнопку Формат и задать цвет шрифта или заливку).

Если необходимо залить не каждую 2-ю, а, скажем, каждую 5-ю строку, то просто измените в этой формуле число 2 на число 5.

Ссылки по теме

Источник: https://www.planetaexcel.ru/techniques/9/71/

Excel в Delphi. Как изменить внешний вид ячеек?

Итак, сегодня разберемся как сделать наш лист Excel более красивым, а именно разберемся со следующими вопросами:

1. Как добраться до конкретной границы ячейки?

Перед Вами окно изменения формата ячеек. Вкладка «Границы». Как видите Excel может отрисовывать следующие границы ячеек:

• верхнюю
• нижнюю
• левую
• правую
• диагональную из верхнего левого угла в нижний правый
• диагональную из верхнего правого угла в нижний левый

Если Вы выбираете диапазон ячеек, то дополнительно добавляются ещё два вида границ:

• внутренние горизонтальные
• внутренние вертикальные.

Кроме этого, Вы можете определить свой стиль линий для прорисовки и цвет линий. В самом Excel работа с форматом ячеек достаточно прозрачна и ясна. А вот при работе с Excel в Delphi все обстоит не так уж и радужно 🙂

Прежде чем браться за прорисовку границ, следует определиться — какой объект Вы будете для этого использовать. Вы можете прорисовать границу с помощью объектов:

1. Cells — ячейка
2. Range — диапазон ячеек
3. UsedRage — диапазон занятых ячеек

Я обычно использую третий вариант (UsedRange), так как работаю с форматами ячеек после того как перешлю необходимые данные в Excel. Кроме того, если пересылается большая таблица с данными, то использовать Cells — значит очень сильно «подвесить» свое приложение, так как надо будет добраться до каждой ячейки и изменить её формат.

Итак, будем использовать UsedRange. Теперь разберемся как нам добраться до границ.

Для того, чтобы получить доступ к коллекции границ объекта достаточно воспользоваться объектом Borders. Так как нам необходим доступ не ко всем границам, а только к конкретной, то после Borders необходимо указывать индекс границы.  В Excel определены следующие константы:

xlDiagonalDown	5	Диагональная от верхнего левого угла в нижний правый каждой ячейки в диапазоне
xlDiagonalUp	6	Диагональная из нижнего левого угла в правый верхний каждой ячейки в диапазоне.
xlEdgeBottom	9	Нижняя для всего диапазона ячеек
xlEdgeLeft	7	Левая для всего диапазона ячеек.
xlEdgeRight	10	Правая для всего диапазона ячеек.
xlEdgeTop	8	Верхняя для всего диапазона ячеек.
xlInsideHorizontal	12	Горизонтальные границы всех внутренних ячеек диапазона
xlInsideVertical	11	Вертикальные границы всех внутренних ячеек диапазона

Теперь переносим эти константы в наш модуль работы с Excel:

uses ….
const
xlDiagonalDown = 5;
xlDiagonalUp = 6;
xlEdgeBottom = 9;
xlEdgeLeft = 7;
xlEdgeRight = 10;
xlEdgeTop = 8;
xlInsideHorizontal = 12;
xlInsideVertical = 11;
….

И для того, чтобы получить доступ, например к нижней границе диапазона ячеек, пишем следующий код:

MyExcel.ActiveWorkBook.ActiveSheet.UsedRange.Borders[xlEdgeBottom]

Аналогичным образом Вы можете получить доступ к любой из восьми границ.

2. Как изменить внешний вид границы?

Доступ к границе получен. Теперь можно приступать к изменению внешнего вида.

Объект Borders имеет следующие свойства:

• LineStyle — стиль линии границы
• ColorIndex — индекс цвета границы
• Weight — толщина границы

Для каждого из этих свойств в Excel определены свои счётчики (Enumerators) или, говоря на языке Delphi — константы.

Стили линий (LineStyle) могут быть следующие:

xlContinuous	1	Непрерывная линия
xlDash	-4115	Пунктирная линия
xlDashDot	4	Пунктир с точкой
xlDashDotDot	5	Пунктир с двумя идущими подряд точками
xlDot	-4118	Линия из точек
xlDouble	-4119	Двойная линия
xlLineStyleNone	-4142	Без линий
xlSlantDashDot	13	Наклонная пунктирная

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

xlHairline	1	Самая тонкая граница
xlMedium	-4138	Средняя толщина
xlThick	4	Толстая граница
xlThin	2	Тонкая граница

Определите эти константы в своем модуле Delphi и можете приступать к прорисовке границ. Например, нам необходимо прорисовать внешние границы таблицы двойной линией, а внутренние — тонкими сплошными. Цвета линий оставим по умолчанию — черными. Тогда код Delphi будет выглядеть следующим образом:

…
with MyExcel.ActiveWorkBook.ActiveSheet.UsedRange do
begin
Borders[xlEdgeBottom].LineStyle:=xlDouble;
Borders[xlEdgeTop].LineStyle:=xlDouble;
Borders[xlEdgeLeft].LineStyle:=xlDouble;
Borders[xlEdgeRight].LineStyle:=xlDouble;
Borders[xlInsideHorizontal].LineStyle:=xlSolid;
Borders[xlInsideVertical].LineStyle:=xlSolid;
end;
…

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

Переходим к следующему вопросу.

3. Как сделать заливку ячеек цветом?

Для заливки ячеек цветом можно использовать те же константы, что и при работе с ячейками. Однако ни объект Range ни Cells не имеют свойства ColorIndex. Чтобы получить доступ к заливке ячейки или диапазона необходимо воспользоваться свойством Interior, которое дает доступ к внутренней части объекта. Например, выполнив операцию:

MyExcel.ActiveWorkBook.ActiveSheet.UsedRange.Interior

вы получите доступ к внутренней части диапазона занятых ячеек, т.е. по сути, ко всей таблице. А получив такой доступ, Вы можете делать с объектом всё, что угодно. Например изменим цвет нашей таблицы на красный:

MyExcel.ActiveWorkBook.ActiveSheet.UsedRange.Interior.ColorIndex:=3;

4. Как изменить шрифт в ячейках?

Для того, чтобы получить доступ к шрифтам, необходимо добраться до одного из свойств UsedRange, а именно до свойства Font, которое и вернет нам объект, позволяющий изменять шрифт, цвет шрифта и прочие атрибуты . Например, изменим цвет шрифта в таблице на синий:

MyExcel.ActiveWorkBook.ActiveSheet.UsedRange.Font.ColorIndex:=5;

Аналогичным образом, через объект Font Вы можете также изменить:

• Толщину шрифта
• Наклон
• Размер
• Сделать текст подчёркнутым и т.д.

Для этого достаточно воспользоваться одним из свойств объекта Fonts.

Источник: https://webdelphi.ru/2009/09/excel-v-delphi-kak-izmenit-vneshnij-vid-yacheek/

VBA Excel. Цвет ячейки (заливка, фон)

Заливка ячейки цветом в VBA Excel. Фон ячейки. Свойства .Interior.Color и .Interior.ColorIndex. Цветовая модель RGB. Стандартная палитра. Очистка фона ячейки.

Свойство .Interior.Color объекта Range

Начиная с Excel 2007 основным способом заливки диапазона или отдельной ячейки цветом (зарисовки, добавления, изменения фона) является использование свойства .Interior.Color объекта Range путем присваивания ему значения цвета в виде десятичного числа от 0 до 16777215 (всего 16777216 цветов).

Заливка ячейки цветом в VBA Excel

Пример кода 1:

Sub ColorTest1()
Range(«A1»).Interior.Color = 31569
Range(«A4:D8»).Interior.Color = 4569325
Range(«C12:D17»).Cells(4).Interior.Color = 568569
Cells(3, 6).Interior.Color = 12659
End Sub

Поместите пример кода в свой программный модуль и нажмите кнопку на панели инструментов «Run Sub» или на клавиатуре «F5», курсор должен быть внутри выполняемой программы. На активном листе Excel ячейки и диапазон, выбранные в коде, окрасятся в соответствующие цвета.

Есть один интересный нюанс: если присвоить свойству .Interior.Color отрицательное значение от -16777215 до -1, то цвет будет соответствовать значению, равному сумме максимального значения палитры (16777215) и присвоенного отрицательного значения. Например, заливка всех трех ячеек после выполнения следующего кода будет одинакова:

Sub ColorTest11()
Cells(1, 1).Interior.Color = -12207890
Cells(2, 1).Interior.Color = 16777215 + (-12207890)
Cells(3, 1).Interior.Color = 4569325
End Sub

Проверено в Excel 2016.

Вывод сообщений о числовых значениях цветов

Числовые значения цветов запомнить невозможно, поэтому часто возникает вопрос о том, как узнать числовое значение фона ячейки. Следующий код VBA Excel выводит сообщения о числовых значениях присвоенных ранее цветов.

Пример кода 2:

Sub ColorTest2()
MsgBox Range(«A1»).Interior.Color
MsgBox Range(«A4:D8»).Interior.Color
MsgBox Range(«C12:D17»).Cells(4).Interior.Color
MsgBox Cells(3, 6).Interior.Color
End Sub

Вместо вывода сообщений можно присвоить числовые значения цветов переменным, объявив их как Long.

Использование предопределенных констант

В VBA Excel есть предопределенные константы часто используемых цветов для заливки ячеек:

Предопределенная константа	Наименование цвета
vbBlack	Черный
vbBlue	Голубой
vbCyan	Бирюзовый
vbGreen	Зеленый
vbMagenta	Пурпурный
vbRed	Красный
vbWhite	Белый
vbYellow	Желтый
xlNone	Нет заливки

Присваивается цвет ячейке предопределенной константой в VBA Excel точно так же, как и числовым значением:

Пример кода 3:

Range(«A1»).Interior.Color = vbGreen

Цветовая модель RGB

Цветовая система RGB представляет собой комбинацию различных по интенсивности основных трех цветов: красного, зеленого и синего. Они могут принимать значения от 0 до 255. Если все значения равны 0 — это черный цвет, если все значения равны 255 — это белый цвет.

Выбрать цвет и узнать его значения RGB можно с помощью палитры Excel:

Палитра Excel

Чтобы можно было присвоить ячейке или диапазону цвет с помощью значений RGB, их необходимо перевести в десятичное число, обозначающее цвет. Для этого существует функция VBA Excel, которая так и называется — RGB.

Пример кода 4:

Range(«A1»).Interior.Color = RGB(100, 150, 200)

Очистка ячейки (диапазона) от заливки

Для очистки ячейки (диапазона) от заливки используется константа xlNone:

Range(«A1»).Interior.Color = xlNone

Свойство .Interior.ColorIndex объекта Range

До появления Excel 2007 существовала только ограниченная палитра для заливки ячеек фоном, состоявшая из 56 цветов, которая сохранилась и в настоящее время. Каждому цвету в этой палитре присвоен индекс от 1 до 56. Присвоить цвет ячейке по индексу или вывести сообщение о нем можно с помощью свойства .Interior.ColorIndex:

Пример кода 5:

Range(«A1»).Interior.ColorIndex = 8
MsgBox Range(«A1»).Interior.ColorIndex

Просмотреть ограниченную палитру для заливки ячеек фоном можно, запустив в VBA Excel простейший макрос:

Пример кода 6:

Sub ColorIndex()
Dim i As Byte
For i = 1 To 56
Cells(i, 1).Interior.ColorIndex = i
Next
End Sub

Номера строк активного листа от 1 до 56 будут соответствовать индексу цвета, а ячейка в первом столбце будет залита соответствующим индексу фоном.

Готовую стандартную палитру из 56 цветов можете посмотреть здесь.

Источник: https://vremya-ne-zhdet.ru/vba-excel/tsvet-yacheyki-zalivka-fon/