VBA Excel. Узор (рисунок) в ячейке

Добавление узора (штрихового рисунка) в ячейку (диапазон) и присвоение узору цвета с помощью кода VBA Excel. Константы XlPattern и XlThemeColor.

Добавление узора в ячейку

Синтаксис добавления узора

Добавление узора в ячейку (диапазон ячеек) с цветом по умолчанию:

ConstantXlPattern – константа из коллекции XlPattern, задающая шаблон узора (штрихового рисунка).

Свойство Interior объекта Range возвращает объект Interior (внутренняя область диапазона), а свойство Pattern объекта Interior задает шаблон узора ячейки (диапазона) или возвращает его числовое значение.

Константы XlPattern

Шаблоны узоров (штриховых рисунков) с цветом по умолчанию:

Шаблоны узоров для ячеек

Таблица констант из коллекции XlPattern:

Константа Значение Описание
xlPatternNone -4142 Нет узора
xlPatternGray75 -4126 75% серый
xlPatternGray50 -4125 50% серый
xlPatternGray25 -4124 25% серый
xlPatternHorizontal -4128 Темные горизонтальные линии
xlPatternVertical -4166 Темные вертикальные полосы
xlPatternDown -4121 Темные диагональные линии слева вниз
xlPatternUp -4162 Темные диагональные линии слева вверх
xlPatternSolid 1 Сплошной цвет
xlPatternChecker 9 Шахматная доска
xlPatternSemiGray75 10 75% темно-серый
xlPatternLightHorizontal 11 Светлые горизонтальные линии
xlPatternLightVertical 12 Светлые вертикальные полосы
xlPatternLightDown 13 Светлые диагональные линии слева вниз
xlPatternLightUp 14 Светлые диагональные линии слева вверх
xlPatternGrid 15 Сетка
xlPatternCrissCross 16 Перекрестные линии
xlPatternGray16 17 16% серый
xlPatternGray8 18 8% серый
xlPatternAutomatic -4105 Шаблоном узора управляет Excel

Присвоение узору цвета

Присвоение одного из стандартных цветов узору в ячейке (диапазоне ячеек):

ConstantXlThemeColor – константа из коллекции XlThemeColor, задающая цвет узора (штрихового рисунка).

Константы XlThemeColor

Стандартные цвета узоров в ячейках на примере рисунка «Темные вертикальные полосы»:

Стандартные цвета узоров для ячеек

Таблица констант из коллекции XlThemeColor:

Константа Значение Описание
xlThemeColorDark1 1 Светлый 1
xlThemeColorLight1 2 Темный 1
xlThemeColorDark2 3 Светлый 2
xlThemeColorLight2 4 Темный 2
xlThemeColorAccent1 5 Акцент 1
xlThemeColorAccent2 6 Акцент 2
xlThemeColorAccent3 7 Акцент 3
xlThemeColorAccent4 8 Акцент 4
xlThemeColorAccent5 9 Акцент 5
xlThemeColorAccent6 10 Акцент 6
xlThemeColorHyperlink 11 Гиперссылка
xlThemeColorFollowedHyperlink 12 Гиперссылка при наведении

Примеры

Пример 1
Проверка наличия узора в активной ячейке:

Пример 2
В столбец «A» запишем значения констант из коллекции XlPattern, а в столбец «B» вставим соответствующие им узоры:

Пример 3
В столбец «A» запишем значения констант из коллекции XlThemeColor, а в столбец «B» вставим соответствующие им цвета для рисунка «Шахматная доска»:

Смотрите как залить ячейку цветом (фоном).


Содержание рубрики VBA Excel по тематическим разделам со ссылками на все статьи.

Добавить комментарий

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