Наименования цветов стандартной палитры Excel из 56 оттенков на русском и английском языках. Соответствие цветов индексам VBA и их RGB и HEX коды.
Стандартная палитра из 56 цветов — это ограниченная палитра оттенков, которая существовала до версии Excel 2007 года, но продолжает использоваться до сих пор.
За ограниченную палитру в VBA Excel отвечает свойство ColorIndex, которое используется для записи и чтения:
|
Sub Primer() Range(«A1»).Interior.ColorIndex = 10 MsgBox Range(«A1»).Interior.ColorIndex End Sub |
Свойство ColorIndex принимает и возвращает значения от 1 до 56.
Наименования 56 цветов палитры
Наименования 56 цветов стандартной ограниченной палитры Excel на русском и английском языках:
| Индекс | Наименование по-русски |
Наименование по-английски | Оттенок |
|---|---|---|---|
| 1 | Черный | Black | |
| 2 | Белый | White | |
| 3 | Красный | Red | |
| 4 | Лайм | Lime | |
| 5 | Синий | Blue | |
| 6 | Желтый | Yellow | |
| 7 | Фуксия* | Fuchsia* | |
| 8 | Цвет морской волны | Aqua | |
| 9 | Темно-бордовый | Maroon | |
| 10 | Зеленый | Green | |
| 11 | Темно-синий | Navy blue | |
| 12 | Оливковый | Olive | |
| 13 | Пурпурный | Purple | |
| 14 | Бирюзовый | Teal | |
| 15 | Серебряный | Silver | |
| 16 | Серый | Gray | |
| 17 | Светло-пурпурно-синий | Light purple blue | |
| 18 | Розовато-лиловый | Mauve | |
| 19 | Бледно-желто-зеленый | Pale yellow green | |
| 20 | Бледно-голубой | Pale blue | |
| 21 | Сливовый | Plum | |
| 22 | Лососевый | Salmon | |
| 23 | Темно-сине-голубой | Light navy blue | |
| 24 | Барвинок | Periwinkle | |
| 25 | Темно-синий | Navy blue | |
| 26 | Фуксия* | Fuchsia* | |
| 27 | Желтый | Yellow | |
| 28 | Цвет морской волны | Aqua | |
| 29 | Пурпурный | Purple | |
| 30 | Коричнево-малиновый | Maroon | |
| 31 | Сине-зеленый | Teal | |
| 32 | Синий | Blue | |
| 33 | Небесно-голубой | Vivid sky blue | |
| 34 | Бледно-голубой | Pale blue | |
| 35 | Бледно-зеленый | Pale green | |
| 36 | Светло-желтый | Light yellow | |
| 37 | Сине-голубой | Shade of blue | |
| 38 | Бледно-пурпурно-розовый | Pale magenta pink | |
| 39 | Светло-сиреневый | Light lilac | |
| 40 | Оранжево-персиковый | Peach-orange | |
| 41 | Светло-синий | Light blue | |
| 42 | Светло-бирюзовый | Light turquoise | |
| 43 | Желто-зеленый | Yellow green | |
| 44 | Желтый мандарин | Tangerine yellow | |
| 45 | Сигнальный оранжевый | Safety orange | |
| 46 | Оранжевый | Orange | |
| 47 | Темно-сине-серый | Dark blue gray | |
| 48 | Светло-серый | Light gray | |
| 49 | Полуночно-синий | Midnight blue | |
| 50 | Зеленая трава | Green grass | |
| 51 | Темно-зеленый | Dark green | |
| 52 | Темно-коричневый | Dark brown | |
| 53 | Темно-красный | Dark red | |
| 54 | Розовато-лиловый | Mauve | |
| 55 | Синий пигмент | Blue pigment | |
| 56 | Темный уголь | Dark charcoal |
* Вместо термина Фуксия (Fuchsia) можно использовать термин Маджента (Magenta), так как в RGB-модели Фуксия и Маджента являются одним и тем же цветом.
Обратите внимание, что в стандартной палитре Excel из 56 цветов есть повторяющиеся оттенки. Наименования цветов (по их HEX-кодам) подобраны, главным образом, по статьям, опубликованным в Википедии.
RGB и HEX коды оттенков палитры
RGB и HEX коды оттенков 56-цветной палитры Excel:
| Индекс | Код HEX | Код RGB | Оттенок |
|---|---|---|---|
| 1 | #000000 | RGB(0, 0, 0) | |
| 2 | #ffffff | RGB(255, 255, 255) | |
| 3 | #ff0000 | RGB(255, 0, 0) | |
| 4 | #00ff00 | RGB(0, 255, 0) | |
| 5 | #0000ff | RGB(0, 0, 255) | |
| 6 | #ffff00 | RGB(255, 255, 0) | |
| 7 | #ff00ff | RGB(255, 0, 255) | |
| 8 | #00ffff | RGB(0, 255, 255) | |
| 9 | #800000 | RGB(128, 0, 0) | |
| 10 | #008000 | RGB(0, 128, 0) | |
| 11 | #000080 | RGB(0, 0, 128) | |
| 12 | #808000 | RGB(128, 128, 0) | |
| 13 | #800080 | RGB(128, 0, 128) | |
| 14 | #008080 | RGB(0, 128, 128) | |
| 15 | #c0c0c0 | RGB(192, 192, 192) | |
| 16 | #808080 | RGB(128, 128, 128) | |
| 17 | #9999ff | RGB(153, 153, 255) | |
| 18 | #993366 | RGB(153, 51, 102) | |
| 19 | #ffffcc | RGB(255, 255, 204) | |
| 20 | #ccffff | RGB(204, 255, 255) | |
| 21 | #660066 | RGB(102, 0, 102) | |
| 22 | #ff8080 | RGB(255, 128, 128) | |
| 23 | #0066cc | RGB(0, 102, 204) | |
| 24 | #ccccff | RGB(204, 204, 255) | |
| 25 | #000080 | RGB(0, 0, 128) | |
| 26 | #ff00ff | RGB(255, 0, 255) | |
| 27 | #ffff00 | RGB(255, 255, 0) | |
| 28 | #00ffff | RGB(0, 255, 255) | |
| 29 | #800080 | RGB(128, 0, 128) | |
| 30 | #800000 | RGB(128, 0, 0) | |
| 31 | #008080 | RGB(0, 128, 128) | |
| 32 | #0000ff | RGB(0, 0, 255) | |
| 33 | #00ccff | RGB(0, 204, 255) | |
| 34 | #ccffff | RGB(204, 255, 255) | |
| 35 | #ccffcc | RGB(204, 255, 204) | |
| 36 | #ffff99 | RGB(255, 255, 153) | |
| 37 | #99ccff | RGB(153, 204, 255) | |
| 38 | #ff99cc | RGB(255, 153, 204) | |
| 39 | #cc99ff | RGB(204, 153, 255) | |
| 40 | #ffcc99 | RGB(255, 204, 153) | |
| 41 | #3366ff | RGB(51, 102, 255) | |
| 42 | #33cccc | RGB(51, 204, 204) | |
| 43 | #99cc00 | RGB(153, 204, 0) | |
| 44 | #ffcc00 | RGB(255, 204, 0) | |
| 45 | #ff9900 | RGB(255, 153, 0) | |
| 46 | #ff6600 | RGB(255, 102, 0) | |
| 47 | #666699 | RGB(102, 102, 153) | |
| 48 | #969696 | RGB(150, 150, 150) | |
| 49 | #003366 | RGB(0, 51, 102) | |
| 50 | #339966 | RGB(51, 153, 102) | |
| 51 | #003300 | RGB(0, 51, 0) | |
| 52 | #333300 | RGB(51, 51, 0) | |
| 53 | #993300 | RGB(153, 51, 0) | |
| 54 | #993366 | RGB(153, 51, 102) | |
| 55 | #333399 | RGB(51, 51, 153) | |
| 56 | #333333 | RGB(51, 51, 51) |
RGB-коды можно использовать в VBA Excel наряду с индексами цветов стандартной палитры, а HEX-коды — в HTML.
Процент черного в оттенках серого
Процентное соотношение черного цвета в оттенках серого:
| Индекс | Наименование | Процент черного | Оттенок |
|---|---|---|---|
| 1 | Черный | 100% | |
| 2 | Белый | 0% | |
| 15 | Серебряный | 25% | |
| 16 | Серый | 50% | |
| 48 | Светло-серый | 40% | |
| 56 | Темный уголь | 80% |
Вывод 56-цветной палитры на лист
Вывод на рабочий лист Excel 56-цветной палитры с помощью кода VBA:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
‘Функция, преобразующая десятичный код цвета в аргументы RGB Function DecToRGB(ByVal ColDec As Long) As String Dim r As Long Dim g As Long Dim b As Long r = (ColDec And &HFF&) 256 ^ 0 g = (ColDec And &HFF00&) 256 ^ 1 b = ColDec 256 ^ 2 DecToRGB = CStr(r) & «, « & CStr(g) & «, « & CStr(b) End Function ‘Вывод 56-цветной палитры на активный лист Sub Color56() Dim i As Integer For i = 1 To 56 Cells(i, 1) = i Cells(i, 2).Interior.ColorIndex = i Cells(i, 3).Value = «RGB(« & DecToRGB(Cells(i, 2).Interior.Color) & «)» Next End Sub |
Процедура Color56 записывает в ячейку первого столбца индекс цвета, ячейке второго столбца присваивается соответствующая индексу заливка, в ячейку третьего столбца записывается RGB-код соответствующего индексу цвета.
Надстройка PLEX для Microsoft Excel 2007-2021 и Office 365
Данная функция позволяет определить внутренний числовой Excel код цвета заливки любой указанной ячейки. Это дает возможность пользователю впоследствии производить сортировку и фильтрацию ячеек по цвету, что часто бывает необходимо.
Синтаксис
=CellColor(cell)
где
- cell — ячейка, для которой нужно определить код цвета заливки
Примечания
К сожалению, поскольку Excel формально не считает смену цвета изменением содержимого листа, то эта функция не будет пересчитываться автоматически при изменении форматирования — обновление значений этой функции происходит только при нажатии сочетания клавиш полного пересчета листа Ctrl+Alt+F9.
Также (в силу ограничений самого Excel), данная функция не может считывать код цвета, если было использовано условное форматирование.
Если для ячейки не установлен цвет заливки, то код = -4142.
Если нужен RGB-код цвета, то используйте функцию RGBCellColor.
Если нужен код цвета не заливки, а шрифта, то используйте функцию CellFontColor.
Полный список всех инструментов надстройки PLEX
Содержание
- Как узнать код цвета ячейки в excel
- Как определить цвет заливки ячейки
- Описание работы функции
- Пример использования
- Как узнать код цвета ячейки в excel
- Функция CellColor
- Как узнать цвет ячейки excel
- Как определить цвет заливки ячейки
- Пример использования
- Как определить цвет в Excel
- Как узнать цвет ячейки excel
- Функция CellColor
- Как определить номер цвета в excel
- Как определить цвет заливки ячейки
- Описание работы функции
- Пример использования
- Как определить номер цвета в excel
- Функция CellColor
- VBA Excel. Стандартная палитра из 56 цветов
- Стандартная палитра из 56 цветов
- Наименования 56 цветов палитры
- RGB и HEX коды оттенков палитры
- Процент черного в оттенках серого
- Вывод 56-цветной палитры на лист
Как узнать код цвета ячейки в excel
Как определить цвет заливки ячейки
Описание работы функции
Функция =ЦВЕТЗАЛИВКИ(ЯЧЕЙКА) возвращает код цвета заливки выбранной ячейки. Имеет один обязательный аргумент:
- ЯЧЕЙКА — ссылка на ячейку, для которой необходимо применить функцию.
Ниже представлен пример, демонстрирующий работу функции.
Следует обратить внимание на тот факт, что функция не пересчитывается автоматически. Это связано с тем, что изменение цвета заливки ячейки Excel не приводит к пересчету формул. Для пересчета формулы необходимо пользоваться сочетанием клавиш Ctrl+Alt+F9
Пример использования
Так как заливка ячеек значительно упрощает восприятие данных, то пользоваться ей любят практически все пользователи. Однако есть и большой минус — в стандартном функционале Excel отсутствует возможность выполнять операции на основе цвета заливки. Нельзя просуммировать ячейки определенного цвета, посчитать их количество, найти максимальное и так далее.
С помощью функции ЦВЕТЗАЛИВКИ все это становится выполнимым. Например, «протяните» данную формулу с цветом заливки в соседнем столбце и производите вычисления на основе числового кода ячейки.
Как узнать код цвета ячейки в excel
- Коротко
- Подробно
- Вопрос-Ответ
- Версии
- Скачать
- Купить
Функция CellColor
Данная функция позволяет определить внутренний числовой Excel код цвета заливки любой указанной ячейки. Это дает возможность пользователю впоследствии производить сортировку и фильтрацию ячеек по цвету, что часто бывает необходимо.
Синтаксис
- cell — ячейка, для которой нужно определить код цвета заливки
Примечания
К сожалению, поскольку Excel формально не считает смену цвета изменением содержимого листа, то эта функция не будет пересчитываться автоматически при изменении форматирования — обновление значений этой функции происходит только при нажатии сочетания клавиш полного пересчета листа Ctrl+Alt+F9.
Также (в силу ограничений самого Excel), данная функция не может считывать код цвета, если было использовано условное форматирование.
Если для ячейки не установлен цвет заливки, то код = -4142.
Если нужен RGB-код цвета, то используйте функцию RGBCellColor.
Если нужен код цвета не заливки, а шрифта, то используйте функцию CellFontColor.
Источник
Как узнать цвет ячейки excel
Как определить цвет заливки ячейки
Функция =ЦВЕТЗАЛИВКИ(ЯЧЕЙКА) возвращает код цвета заливки выбранной ячейки. Имеет один обязательный аргумент:
- ЯЧЕЙКА — ссылка на ячейку, для которой необходимо применить функцию.
Ниже представлен пример, демонстрирующий работу функции.
Следует обратить внимание на тот факт, что функция не пересчитывается автоматически. Это связано с тем, что изменение цвета заливки ячейки Excel не приводит к пересчету формул. Для пересчета формулы необходимо пользоваться сочетанием клавиш Ctrl+Alt+F9
Пример использования
Так как заливка ячеек значительно упрощает восприятие данных, то пользоваться ей любят практически все пользователи. Однако есть и большой минус — в стандартном функционале Excel отсутствует возможность выполнять операции на основе цвета заливки. Нельзя просуммировать ячейки определенного цвета, посчитать их количество, найти максимальное и так далее.
С помощью функции ЦВЕТЗАЛИВКИ все это становится выполнимым. Например, «протяните» данную формулу с цветом заливки в соседнем столбце и производите вычисления на основе числового кода ячейки.
Как определить цвет в Excel
Иногда возникает необходимость изменить, определить цвет ячейки для копирования, закрасить определенную область, придав тем самым неповторимые и выразительные черты таблице данных.
В этой статье мы рассмотрим как вручную можно менять цвет ячейки, а так же как прописать в VBA изменение цвета диапазона ячеек или одной выделенной ячейки.
Начнем с простого. На главной панели инструментов ленты находится панель Формата Ячеек:
Для того, чтобы изменить цвет ячейки (диапазона ячеек) нам необходимо выделить ее, после чего на Панели инструментов выбрать необходимый цвет. Так же можно задать другие цвета, выбрав их из палитры. Панель инструментов меняет так же цвет текста, размер шрифта и формат границы ячейки.
Теперь зададим формат ячейки пользуясь контекстным меню, для чего кликнем правой кнопкой мыши на ячейке и в открывшемся списке выберем «Формат Ячеек»:
На вкладке «Заливка» можно выбрать цвет фона и узор.
Рассмотрим несколько иную ситуацию. Допустим вы хотите скопировать цвет ячейки (и формат) с существующей и применить к своим ячейкам. Воспользуемся кнопкой на главной панели «Формат по образцу» («метелочка»):
Таким образом, для того, чтобы скопировать формат необходимо выделить интересующую нас ячейку, нажать на «метелочку» и кликнуть по ячейке, формат которой мы хотим задать.
Аналогичные операции можно описать и в Макросах. Если есть необходимость вставить в код условие, по которому будет меняться формат ячейки или проводиться суммирование ячеек с определенным цветом или шрифтом, то проведя операции копирования формата с записью макроса, можно увидеть что:
Задать цвет ячейке (A1 окрашивается в Желтый):
Скопировать формат ячейки (формат A1 копируется на A3):
Теперь комбинируя формат с операторами условия можно написать вычисления (например, суммирование) по условию цвета.
Будем благодарны, если Вы нажмете +1 и/или Мне нравится внизу данной статьи или поделитесь с друзьями с помощью кнопок ниже.
Как узнать цвет ячейки excel
Функция CellColor
Данная функция позволяет определить внутренний числовой Excel код цвета заливки любой указанной ячейки. Это дает возможность пользователю впоследствии производить сортировку и фильтрацию ячеек по цвету, что часто бывает необходимо.
Синтаксис
- cell — ячейка, для которой нужно определить код цвета заливки
Примечания
К сожалению, поскольку Excel формально не считает смену цвета изменением содержимого листа, то эта функция не будет пересчитываться автоматически при изменении форматирования — обновление значений этой функции происходит только при нажатии сочетания клавиш полного пересчета листа Ctrl+Alt+F9.
Также (в силу ограничений самого Excel), данная функция не может считывать код цвета, если было использовано условное форматирование.
Если для ячейки не установлен цвет заливки, то код = -4142.
Если нужен RGB-код цвета, то используйте функцию RGBCellColor.
Если нужен код цвета не заливки, а шрифта, то используйте функцию CellFontColor.
Источник
Как определить номер цвета в excel
Как определить цвет заливки ячейки
Описание работы функции
Функция =ЦВЕТЗАЛИВКИ(ЯЧЕЙКА) возвращает код цвета заливки выбранной ячейки. Имеет один обязательный аргумент:
- ЯЧЕЙКА — ссылка на ячейку, для которой необходимо применить функцию.
Ниже представлен пример, демонстрирующий работу функции.
Следует обратить внимание на тот факт, что функция не пересчитывается автоматически. Это связано с тем, что изменение цвета заливки ячейки Excel не приводит к пересчету формул. Для пересчета формулы необходимо пользоваться сочетанием клавиш Ctrl+Alt+F9
Пример использования
Так как заливка ячеек значительно упрощает восприятие данных, то пользоваться ей любят практически все пользователи. Однако есть и большой минус — в стандартном функционале Excel отсутствует возможность выполнять операции на основе цвета заливки. Нельзя просуммировать ячейки определенного цвета, посчитать их количество, найти максимальное и так далее.
С помощью функции ЦВЕТЗАЛИВКИ все это становится выполнимым. Например, «протяните» данную формулу с цветом заливки в соседнем столбце и производите вычисления на основе числового кода ячейки.
Как определить номер цвета в excel
- Коротко
- Подробно
- Вопрос-Ответ
- Версии
- Скачать
- Купить
Функция CellColor
Данная функция позволяет определить внутренний числовой Excel код цвета заливки любой указанной ячейки. Это дает возможность пользователю впоследствии производить сортировку и фильтрацию ячеек по цвету, что часто бывает необходимо.
Синтаксис
- cell — ячейка, для которой нужно определить код цвета заливки
Примечания
К сожалению, поскольку Excel формально не считает смену цвета изменением содержимого листа, то эта функция не будет пересчитываться автоматически при изменении форматирования — обновление значений этой функции происходит только при нажатии сочетания клавиш полного пересчета листа Ctrl+Alt+F9.
Также (в силу ограничений самого Excel), данная функция не может считывать код цвета, если было использовано условное форматирование.
Если для ячейки не установлен цвет заливки, то код = -4142.
Если нужен RGB-код цвета, то используйте функцию RGBCellColor.
Если нужен код цвета не заливки, а шрифта, то используйте функцию CellFontColor.
Источник
VBA Excel. Стандартная палитра из 56 цветов
Наименования цветов стандартной палитры Excel из 56 оттенков на русском и английском языках. Соответствие цветов индексам VBA и их RGB и HEX коды.
Стандартная палитра из 56 цветов
За ограниченную палитру в VBA Excel отвечает свойство ColorIndex, которое используется для записи и чтения:
Свойство ColorIndex принимает и возвращает значения от 1 до 56.
Наименования 56 цветов палитры
Наименования 56 цветов стандартной ограниченной палитры Excel на русском и английском языках:
| Индекс | Наименование по-русски |
Наименование по-английски | Оттенок |
|---|---|---|---|
| 1 | Черный | Black | |
| 2 | Белый | White | |
| 3 | Красный | Red | |
| 4 | Лайм | Lime | |
| 5 | Синий | Blue | |
| 6 | Желтый | Yellow | |
| 7 | Фуксия* | Fuchsia* | |
| 8 | Цвет морской волны | Aqua | |
| 9 | Темно-бордовый | Maroon | |
| 10 | Зеленый | Green | |
| 11 | Темно-синий | Navy blue | |
| 12 | Оливковый | Olive | |
| 13 | Пурпурный | Purple | |
| 14 | Бирюзовый | Teal | |
| 15 | Серебряный | Silver | |
| 16 | Серый | Gray | |
| 17 | Светло-пурпурно-синий | Light purple blue | |
| 18 | Розовато-лиловый | Mauve | |
| 19 | Бледно-желто-зеленый | Pale yellow green | |
| 20 | Бледно-голубой | Pale blue | |
| 21 | Сливовый | Plum | |
| 22 | Лососевый | Salmon | |
| 23 | Темно-сине-голубой | Light navy blue | |
| 24 | Барвинок | Periwinkle | |
| 25 | Темно-синий | Navy blue | |
| 26 | Фуксия* | Fuchsia* | |
| 27 | Желтый | Yellow | |
| 28 | Цвет морской волны | Aqua | |
| 29 | Пурпурный | Purple | |
| 30 | Коричнево-малиновый | Maroon | |
| 31 | Сине-зеленый | Teal | |
| 32 | Синий | Blue | |
| 33 | Небесно-голубой | Vivid sky blue | |
| 34 | Бледно-голубой | Pale blue | |
| 35 | Бледно-зеленый | Pale green | |
| 36 | Светло-желтый | Light yellow | |
| 37 | Сине-голубой | Shade of blue | |
| 38 | Бледно-пурпурно-розовый | Pale magenta pink | |
| 39 | Светло-сиреневый | Light lilac | |
| 40 | Оранжево-персиковый | Peach-orange | |
| 41 | Светло-синий | Light blue | |
| 42 | Светло-бирюзовый | Light turquoise | |
| 43 | Желто-зеленый | Yellow green | |
| 44 | Желтый мандарин | Tangerine yellow | |
| 45 | Сигнальный оранжевый | Safety orange | |
| 46 | Оранжевый | Orange | |
| 47 | Темно-сине-серый | Dark blue gray | |
| 48 | Светло-серый | Light gray | |
| 49 | Полуночно-синий | Midnight blue | |
| 50 | Зеленая трава | Green grass | |
| 51 | Темно-зеленый | Dark green | |
| 52 | Темно-коричневый | Dark brown | |
| 53 | Темно-красный | Dark red | |
| 54 | Розовато-лиловый | Mauve | |
| 55 | Синий пигмент | Blue pigment | |
| 56 | Темный уголь | Dark charcoal |
* Вместо термина Фуксия (Fuchsia) можно использовать термин Маджента (Magenta), так как в RGB-модели Фуксия и Маджента являются одним и тем же цветом.
Обратите внимание, что в стандартной палитре Excel из 56 цветов есть повторяющиеся оттенки. Наименования цветов (по их HEX-кодам) подобраны, главным образом, по статьям, опубликованным в Википедии.
RGB и HEX коды оттенков палитры
RGB и HEX коды оттенков 56-цветной палитры Excel:
| Индекс | Код HEX | Код RGB | Оттенок |
|---|---|---|---|
| 1 | #000000 | RGB(0, 0, 0) | |
| 2 | #ffffff | RGB(255, 255, 255) | |
| 3 | #ff0000 | RGB(255, 0, 0) | |
| 4 | #00ff00 | RGB(0, 255, 0) | |
| 5 | #0000ff | RGB(0, 0, 255) | |
| 6 | #ffff00 | RGB(255, 255, 0) | |
| 7 | #ff00ff | RGB(255, 0, 255) | |
| 8 | #00ffff | RGB(0, 255, 255) | |
| 9 | #800000 | RGB(128, 0, 0) | |
| 10 | #008000 | RGB(0, 128, 0) | |
| 11 | #000080 | RGB(0, 0, 128) | |
| 12 | #808000 | RGB(128, 128, 0) | |
| 13 | #800080 | RGB(128, 0, 128) | |
| 14 | #008080 | RGB(0, 128, 128) | |
| 15 | #c0c0c0 | RGB(192, 192, 192) | |
| 16 | #808080 | RGB(128, 128, 128) | |
| 17 | #9999ff | RGB(153, 153, 255) | |
| 18 | #993366 | RGB(153, 51, 102) | |
| 19 | #ffffcc | RGB(255, 255, 204) | |
| 20 | #ccffff | RGB(204, 255, 255) | |
| 21 | #660066 | RGB(102, 0, 102) | |
| 22 | #ff8080 | RGB(255, 128, 128) | |
| 23 | #0066cc | RGB(0, 102, 204) | |
| 24 | #ccccff | RGB(204, 204, 255) | |
| 25 | #000080 | RGB(0, 0, 128) | |
| 26 | #ff00ff | RGB(255, 0, 255) | |
| 27 | #ffff00 | RGB(255, 255, 0) | |
| 28 | #00ffff | RGB(0, 255, 255) | |
| 29 | #800080 | RGB(128, 0, 128) | |
| 30 | #800000 | RGB(128, 0, 0) | |
| 31 | #008080 | RGB(0, 128, 128) | |
| 32 | #0000ff | RGB(0, 0, 255) | |
| 33 | #00ccff | RGB(0, 204, 255) | |
| 34 | #ccffff | RGB(204, 255, 255) | |
| 35 | #ccffcc | RGB(204, 255, 204) | |
| 36 | #ffff99 | RGB(255, 255, 153) | |
| 37 | #99ccff | RGB(153, 204, 255) | |
| 38 | #ff99cc | RGB(255, 153, 204) | |
| 39 | #cc99ff | RGB(204, 153, 255) | |
| 40 | #ffcc99 | RGB(255, 204, 153) | |
| 41 | #3366ff | RGB(51, 102, 255) | |
| 42 | #33cccc | RGB(51, 204, 204) | |
| 43 | #99cc00 | RGB(153, 204, 0) | |
| 44 | #ffcc00 | RGB(255, 204, 0) | |
| 45 | #ff9900 | RGB(255, 153, 0) | |
| 46 | #ff6600 | RGB(255, 102, 0) | |
| 47 | #666699 | RGB(102, 102, 153) | |
| 48 | #969696 | RGB(150, 150, 150) | |
| 49 | #003366 | RGB(0, 51, 102) | |
| 50 | #339966 | RGB(51, 153, 102) | |
| 51 | #003300 | RGB(0, 51, 0) | |
| 52 | #333300 | RGB(51, 51, 0) | |
| 53 | #993300 | RGB(153, 51, 0) | |
| 54 | #993366 | RGB(153, 51, 102) | |
| 55 | #333399 | RGB(51, 51, 153) | |
| 56 | #333333 | RGB(51, 51, 51) |
RGB-коды можно использовать в VBA Excel наряду с индексами цветов стандартной палитры, а HEX-коды — в HTML.
Процент черного в оттенках серого
Процентное соотношение черного цвета в оттенках серого:
| Индекс | Наименование | Процент черного | Оттенок |
|---|---|---|---|
| 1 | Черный | 100% | |
| 2 | Белый | 0% | |
| 15 | Серебряный | 25% | |
| 16 | Серый | 50% | |
| 48 | Светло-серый | 40% | |
| 56 | Темный уголь | 80% |
Вывод 56-цветной палитры на лист
Вывод на рабочий лист Excel 56-цветной палитры с помощью кода VBA:
Источник
Here are some small functions for you. From your sheet, press Alt—F11 to reach the VBA editor, insert a new module, paste the below code, go back to your worksheet and use them by their names, like in =FillColor(A1)
The first two are the promised «3-liners» giving decimal values for font and background colors — not very useful though
The second pair converts the decimal number to RGB and returns a string of format N, N, N
The third pair are array formulas — select 3 cells in a row, enter the formula and press Ctrl+Shift+Enter to obtain numeric RGB values in 3 neighboring cells
Function FillColor(Target As Range) As Variant
FillColor = Target.Interior.Color
End Function
Function FontColor(Target As Range) As Variant
FontColor = Target.Font.Color
End Function
Function FillColorRGB(Target As Range) As Variant
Dim N As Double
N = Target.Interior.Color
FillColorRGB = Str(N Mod 256) & ", " & Str(Int(N / 256) Mod 256) & ", " & Str(Int(N / 256 / 256) Mod 256)
End Function
Function FontColorRGB(Target As Range) As Variant
Dim N As Double
N = Target.Font.Color
FontColorRGB = Str(N Mod 256) & ", " & Str(Int(N / 256) Mod 256) & ", " & Str(Int(N / 256 / 256) Mod 256)
End Function
Function FillColorRGBArray(Target As Range) As Variant
Dim N As Double, A(3) As Integer
N = Target.Interior.Color
A(0) = N Mod 256
A(1) = Int(N / 256) Mod 256
A(2) = Int(N / 256 / 256) Mod 256
FillColorRGBArray = A
End Function
Function FontColorRGBArray(Target As Range) As Variant
Dim N As Double, A(3) As Integer
N = Target.Font.Color
A(0) = N Mod 256
A(1) = Int(N / 256) Mod 256
A(2) = Int(N / 256 / 256) Mod 256
FontColorRGBArray = A
End Function
A word of caution: changing the color of a cell does not start recalculation by the above functions/formulas, as recoloring a cell in general is not supposed to drive recalculation. You have to manually start a full recalculation using Ctrl+Alt+Shift+F9
Содержание
- Список кодов индекса цвета VBA
- Свойство цвета VBA
- Цвет VB
- Цвета RGB
- Список кодов ColorIndex и цвета RGB в Access VBA
При использовании VBA для кодирования Colorindex (или цвета фона) ячейки полезно знать, какое целое число будет равно какому цвету. Ниже приведено справочное изображение, на котором показан цвет и указан соответствующий ему Colorindex. он же Цветовая палитра VBA
Вот код, чтобы сделать его для себя или просто добавить эту страницу в закладки:
| 123456789101112131415 | Sub ColorRef ()Dim x As IntegerДля x = от 1 до 56Если x <ТоCells (x, 1) .Interior.ColorIndex = xЯчейки (x, 2) = xЕщеЯчейки (x — 28, 3) .Interior.ColorIndex = xЯчейки (x — 28, 4) = xКонец, еслиДалее xКонец подписки |
Примеры VBA ColorIndex
Установить цвет фона ячейки
| 1 | Диапазон («A1»). Interior.ColorIndex = 6 |
Установить цвет шрифта ячейки
| 1 | Диапазон («A1»). Font.ColorIndex = 5 |
Установить цвет границ ячеек
| 1 | Диапазон («A1»). Borders.ColorIndex = 5 |
Получить индекс цвета фона ячейки
| 123 | Dim col как целое числоcol = Range («A1»). Interior.ColorIndex |
Установите цвет фона ячейки на цвет другой ячейки
| 1 | Диапазон («A1»). Interior.ColorIndex = Range («B1»). Interior.ColorIndex |
Свойство цвета VBA
Вместо использования свойства ColorIndex Excel / VBA вы можете использовать свойство Color. Свойство Color принимает два типа ввода:
- vbColor
- Цвета RGB
Мы обсудим это ниже:
Цвет VB
VB Color — самый простой способ установить цвета в VBA. Однако он также наименее гибкий. Чтобы установить цветовой код с помощью vbColor, используйте таблицу ниже:
Однако, как видно из таблицы, ваши возможности крайне ограничены.
Установить цвет фона ячейки
| 1 | Диапазон («A1»). Interior.Color = vbYellow |
Установить цвет шрифта ячейки
| 1 | Диапазон («A1»). Font.Color = vbBlue |
Установить цвет границ ячеек
| 1 | Диапазон («A1»). Borders.Color = vbRed |
Установите цвет фона ячейки на цвет другой ячейки
| 1 | Диапазон («A1»). Interior.Color = Range («B1»). Interior.Color |
Цвета RGB
RGB означает красный зеленый синий. Это три основных цвета, которые можно комбинировать для получения любого другого цвета. При вводе цветов как RGB введите значение от 0 до 255 для каждого цветового кода.
Вот пример:
| 1 | Диапазон («A1»). Interior.Color = RGB (255,255,0) |
Выше мы установили красный = 255 (максимальное значение), зеленый = 255 (максимальное значение) и синий = 0 (минимальное значение). Это устанавливает желтый цвет фона ячейки.
Вместо этого мы можем установить цвет шрифта ячейки на фиолетовый:
| 1 | Диапазон («A1»). Interior.Color = RGB (128,0,128) |
Существует множество онлайн-инструментов для поиска кода RGB для желаемого цвета (вот один).
Список кодов ColorIndex и цвета RGB в Access VBA
Access использует формы для отображения данных. Коды ColorIndex можно использовать для программного изменения цвета фона и цвета переднего плана объектов в формах Access.
| 12345 | Частная подпрограмма cmdSave_Click ()’изменить цвет фона кнопки сохранения при сохранении записи.DoCmd.RunCommand acCmdSaveRecordcmdSave.BackColor = vbGreenКонец подписки |
