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

Вот как это сделать:

- Выделите диапазон ячеек, которые нужно отформатировать.
- Перейдите в раздел Главная >Форматировать как таблицу.
- Выберите стиль таблицы, в котором применяется заливка с чередованием строк.
- Чтобы изменить заливку со строк на столбцы, выберите таблицу в разделе Конструктор таблиц, а затем снимите флажок Чередующиеся строки и проверка поле Столбцы с полосами.
Совет: Если вы хотите сохранить стиль с чередованием, но убрать функциональность таблицы, выберите команду Преобразовать в диапазон. В этом случае при добавлении строк и столбцов к ним не будет автоматически применяться форматирование с цветными полосами, но его можно применять вручную с помощью команды Формат по образцу.
Применение полос к строкам или столбцам с помощью условного форматирования
Применить особый формат к определенным строкам или столбцам можно также с помощью правила условного форматирования.

Вот как это сделать:

- На листе выполните одно из указанных ниже действий.
- Чтобы применить затенение к определенному диапазону ячеек, выберите ячейки, которые необходимо отформатировать.
- Чтобы применить заливку ко всему листу, нажмите кнопку Выбрать все .


Советы:
- Чтобы изменить правило условного форматирования, щелкните одну из ячеек, к которым применено правило, перейдите в раздел Главная >Условное форматирование >Управление правилами >Изменить правило, а затем внесите изменения.
- Чтобы удалить условное форматирование из ячеек, выделите их, перейдите в раздел Главная >Очистить и выберите Очистить форматы.

Чтобы скопировать условное форматирование в другие ячейки, щелкните одну из ячеек, в которой применено правило, перейдите в раздел Главная >Формат по образцу
Как копировать цвет заливки ячейки в excel
Argument ‘Topic id’ is null or empty
Сейчас на форуме
© Николай Павлов, Planetaexcel, 2006-2023
info@planetaexcel.ru
Использование любых материалов сайта допускается строго с указанием прямой ссылки на источник, упоминанием названия сайта, имени автора и неизменности исходного текста и иллюстраций.
| ООО «Планета Эксел» ИНН 7735603520 ОГРН 1147746834949 |
ИП Павлов Николай Владимирович ИНН 633015842586 ОГРНИП 310633031600071 |
Как скопировать только цвет ячеек? Без формата

Есть столбец с разноцветными ячейками, содержащими текст.
Справа от него столбец с цифрами.
Еще правее столбец с процентами.
Нужно, чтобы второй и третий столбцы были раскрашены так же как первый.
Я бы просто скопировал первый столбец, и специальной вставкой вставил бы формат вместе с цветом в остальные столбцы. Но полностью формат мне не нужен. Нужен только цвет.
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
Ответы с готовыми решениями:
Как принудить Excel копировать из ячейки в ячейку только ее значение без формата?
Как принудить Excel копировать из ячейки в ячейку только ее значение без формата?
Изменение формата ячеек происходит только на первой итерации цикла
Вообще начал только делать некий аналог Домашней Бухгалтерии. Пользователю предлагается ввести.
Быстрый перенос формата ячеек без использования .Copy и .Cut
Доброго дня! Задача: собрать с нескольких листов таблицы с форматированием и поместить на один.
Скопировать несколько столбцов в один без пустых ячеек
Здравствуйте! Подскажите, пожалуйста, можно ли воплотить следующую вещь. В прикрепленном файле в.
Выделяешь столбцы и запускаешь цикл, по строкам. Смотришь цвет первой ячейки, меняешь у двух остальных. Всё просто.
А вообще советую пользоваться Записью макросов. Вот, например, для одной ячейки:
1 2 3 4
With Selection.Interior .ColorIndex = 8 .Pattern = xlSolid End With
Для диапазона расширить не проблема
Регистрация: 25.04.2010
Сообщений: 30
1 2 3 4 5 6
Sub e() rf = WorksheetFunction.CountA(Columns('A')) 'столбец А с цветом, столбец Б с процентами For i = 1 To rf Cells(i, 2).Interior.ColorIndex = Cells(i, 1).Interior.ColorIndex Next i End Sub
Регистрация: 15.03.2011
Сообщений: 23
А без перебора каждой ячейки нельзя обойтись?
А то если столбцов не два, а 50 и ячеек в них по 100 на каждую.
Шибко долго будет.
Регистрация: 25.04.2010
Сообщений: 30
to Apkaxa
вы о VBA имеете представление?
Регистрация: 05.09.2010
Сообщений: 370
А цветов сколько? Если до трех, то можно модифицировать таблицу (вставить дополнительный столбец, в котором ставить например 1, 2 или 3), а строку красить через УСЛОВНОЕ ФОРМАТИРОВАНИЕ.
Регистрация: 15.03.2011
Сообщений: 23
Ну вообще-то я новичок.
Представление о VBA пытаюсь сейчас получить задавая вопросы разным людям.
Очень прошу не посылать меня в яндекс искать книги по VBA, читать их корки до корки, а потом задавать вопросы.
А если вы задали этот вопрос с целью выяснения, насколько подробно мне нужно разжевывать ответ, то хотелось бы по возможности получить максимально полное пояснение о том, как работает предложенный код.
to Masalov
Цветов может быть 6-8.
Регистрация: 25.04.2010
Сообщений: 30
открываете книгу excel с вашими данными.
нажимаете alt + F11
слева находите ‘эта книга’, там правой кнопкой мыши insert — module
копируете написанный мной код и вставляете туда.
далее закрываете окно VBA (вернулись в Excel)
сервис — макросы — выбрали программу ‘копирование_цвета’ — выполнить.
кстати для трех столбцов код немного изменится (копируй, то что ниже):
1 2 3 4 5 6 7
Sub копирование_цвета() rf = WorksheetFunction.CountA(Columns('A')) 'столбец А с цветом, столбец B с цифрами, столбец С процентами For i = 1 To rf Cells(i, 2).Interior.ColorIndex = Cells(i, 1).Interior.ColorIndex Cells(i, 3).Interior.ColorIndex = Cells(i, 1).Interior.ColorIndex Next i End Sub
Как определить цвет заливки ячейки
К сожалению, Excel не содержит встроенной формулы, которая определяет код заливки ячейки. Но сделать это возможно установив пользовательскую функцию.
Описание работы функции
Функция =ЦВЕТЗАЛИВКИ(ЯЧЕЙКА) возвращает код цвета заливки выбранной ячейки. Имеет один обязательный аргумент:
- ЯЧЕЙКА — ссылка на ячейку, для которой необходимо применить функцию.
Ниже представлен пример, демонстрирующий работу функции.

Следует обратить внимание на тот факт, что функция не пересчитывается автоматически. Это связано с тем, что изменение цвета заливки ячейки Excel не приводит к пересчету формул. Для пересчета формулы необходимо пользоваться сочетанием клавиш Ctrl+Alt+F9
Пример использования
Так как заливка ячеек значительно упрощает восприятие данных, то пользоваться ей любят практически все пользователи. Однако есть и большой минус — в стандартном функционале Excel отсутствует возможность выполнять операции на основе цвета заливки. Нельзя просуммировать ячейки определенного цвета, посчитать их количество, найти максимальное и так далее.
С помощью функции ЦВЕТЗАЛИВКИ все это становится выполнимым. Например, «протяните» данную формулу с цветом заливки в соседнем столбце и производите вычисления на основе числового кода ячейки.
Код на VBA
Public Function ЦВЕТЗАЛИВКИ(ЯЧЕЙКА As Range) As Double ЦВЕТЗАЛИВКИ = ЯЧЕЙКА.Interior.Color End Function

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