Как скопировать цвет ячейки в excel
Помечать ячейки цветом, используя заливку или цвет шрифта, очень удобно и наглядно. Если вы не дальтоник, конечно :) Трудности возникают тогда, когда по такой раскрашенной таблице возникает необходимость сделать отчет. И если фильтровать и сортировать по цвету Excel в последних версиях научился, то суммировать по цвету до сих пор не умеет.
На вкладке Разработчик (Developer) нажмите кнопку Visual Basic или сочетание клавиш Alt + F11 , чтобы открыть редактор макросов. Если такой вкладки у вас не видно, то включите ее в настройках Файл - Параметры - Настройка ленты (File - Options - Customize Ribbon) .
В окне редактора вставьте новый модуль через меню Insert - Module и скопируйте туда текст следующих функций:
Как легко сообразить, первая функция здесь вычисляет количество ячеек с заданным цветом заливки, вторая - сумму, а третья - среднее арифметическое. У всех функций два аргумента:
- DataRange - диапазон исходных ячеек с числами, раскрашенных в разные цвета
- ColorSample - ячейка, цвет заливки которой мы берём за образец
Если теперь вернуться в Excel, то в Мастере функций (вкладка Формулы - кнопка Вставить функцию) в появившейся там категории Определенные пользователем (User Defined) можно найти наши функции и вставить их на лист. Либо напрямую ввести их в строку формул, как любые другие функции Excel:
Добавление условий
Аналогичный подход можно легко масштабировать, добавляя, при необходимости, дополнительные условия в проверку (команда if . then. ). Так, например, если нам нужно при вычислении среднего арифметического учитывать не только цвет заливки, но и цвет шрифта (т.е. считать не просто жёлтые, а именно жёлто-красные ячейки), то код нашей макро-функции будет выглядеть так:Разница только в добавленном через логическую связку "И" (and) условии на проверку соответствия цвета шрифта очередной проверяемой ячейки cell.Font.Color цвету шрифта ячейки-образца ColorSample.Font.Color.Ограничения и нюансы пересчёта
У созданных нами макрофункций есть 2 важных нюанса.
Во-первых, эти функции "не видят" заливку, созданную с помощью условного форматирования, т.е. работают только с цветом, который был задан для ячеек вручную.
Во-вторых, к сожалению, изменение цвета заливки или цвета шрифта ячейки Excel не считает изменением её содержимого, поэтому не запускает пересчет формул. То есть при перекрашивании исходных ячеек с числами в другие цвета итоговая сумма/среднее/количество по нашим функциям автоматически пересчитываться пересчитываться не будет.
Полностью решить эту проблему невозможно, но есть несколько способов её обойти:
- Сделать двойной щелчок левой кнопкой мыши по ячейки с нашей формулой и нажать на Enter , т.е. имитировать повторный ввод функции в ячейку - Excel её заново пересчитает и выдаст обновленный результат.
- Можно использовать сочетание клавиш Ctrl + Alt + F9 , которое принудительно заставит Excel пересчитать всё формулы и функции независимо от того, изменились ли для них исходные данные. Но это сочетание нужно будет не забывать нажимать каждый раз при изменении исходных данных.
- Добавить в код наших макрофункций (в любое место) команду Application.Volatile True. Эта команда языка Visual Basic заставляет Excel пересчитывать результаты нашей функции при изменении любой ячейки на листе (или по нажатию F9). Однако, в этом случае, скорость работы наших функций заметно снизится, т.к. их пересчёт будет происходить постоянно - даже когда мы не меняли цвета или значения ячеек в исходных данных. Пользуйтесь этим методом осторожно.
И помните о том, что наша функция перебирает все (и пустые тоже) ячейки в диапазоне DataRange и не задавайте в качестве первого аргумента целый столбец - "думать" будет долго :)
В Excel вы можете заливать разные цвета фона, чтобы выделить важное значение, но пытались ли вы когда-нибудь найти ячейки, содержащие один и тот же цвет, и сразу заменить их другим цветом в Excel?
Найти и заменить цвет заливки с помощью функции поиска и замены
Чтобы найти ячейки с одинаковым цветом заливки и заменить их другим цветом, который вам нравится, функция «Найти и заменить» в Excel может помочь вам завершить эту работу. Пожалуйста, сделайте следующее:
1. Выберите ячейки диапазона, которые вы хотите найти, и замените цвет заливки.
2, Нажмите Ctrl + H для открытия Найти и заменить диалоговое окно, см. снимок экрана:
3. Затем нажмите Опции >> кнопку, чтобы развернуть Найти и заменить диалоговое окно, в развернутом диалоговом окне щелкните Формат Кроме того, Найти то, что раздел и выберите Выбрать формат из ячейки из выпадающего списка см. снимок экрана:
4. Затем щелкните, чтобы выбрать одну ячейку, содержащую цвет, который вы хотите заменить, после выбора цвета ячейки, затем щелкните Формат Кроме того, Заменить , и выберите Формат из выпадающего списка, см. снимок экрана:
5. В выскочившем Заменить формат диалоговом окне выберите один понравившийся цвет под Заполнять вкладку, см. снимок экрана:
6. Затем нажмите OK вернуться к Найти и заменить диалоговое окно, нажмите Заменить все кнопку, чтобы заменить цвет сразу, и появится окно с подсказкой, чтобы напомнить вам количество замен, см. снимок экрана:
7. Затем нажмите OK и закрыть Найти и заменить вы увидите, что ячейки с указанным вами цветом заливки были заменены другим цветом.
Найти и заменить цвет заливки с помощью Kutools for Excel
Если вас интересуют другие решения для этой задачи, я могу представить вам удобный инструмент - Kutools for Excel, С его Выбрать ячейки с форматом Утилита, вы можете быстро выделить все ячейки с одинаковым форматированием с определенной ячейкой.
После установки Kutools for Excel, пожалуйста, сделайте так:
1. Выберите диапазон данных, который вы хотите использовать.
2. Нажмите Kutools > Выберите > Выбрать ячейки с форматом, см. снимок экрана:
3. В Выбрать ячейки с форматом диалоговое окно, нажмите Выбрать формат из ячейки кнопку, см. снимок экрана:
4. Затем выберите ячейку, содержащую цвет, который вы хотите заменить в Выбрать ячейки с форматом диалог, см. снимок экрана:
5. Затем нажмите OK, все атрибуты выбранной ячейки были перечислены в диалоговом окне, и только отметьте Цвет фона под Заполнять вариант, см. снимок экрана:
6, Затем нажмите Ok, сразу же выбираются все ячейки, заполненные этим цветом, затем щелкните Главная > Цвет заливкии выберите один цвет, который вы хотите, и цвет выбранных ячеек был заменен, как показано на следующем снимке экрана:
Иногда возникает необходимость изменить, определить цвет ячейки для копирования, закрасить определенную область, придав тем самым неповторимые и выразительные черты таблице данных.
В этой статье мы рассмотрим как вручную можно менять цвет ячейки, а так же как прописать в VBA изменение цвета диапазона ячеек или одной выделенной ячейки.
Начнем с простого. На главной панели инструментов ленты находится панель Формата Ячеек:
Для того, чтобы изменить цвет ячейки (диапазона ячеек) нам необходимо выделить ее, после чего на Панели инструментов выбрать необходимый цвет. Так же можно задать другие цвета, выбрав их из палитры. Панель инструментов меняет так же цвет текста, размер шрифта и формат границы ячейки.
Аналогичные операции можно описать и в Макросах. Если есть необходимость вставить в код условие, по которому будет меняться формат ячейки или проводиться суммирование ячеек с определенным цветом или шрифтом, то проведя операции копирования формата с записью макроса, можно увидеть что:
Задать цвет ячейке (A1 окрашивается в Желтый):
Скопировать формат ячейки (формат A1 копируется на A3):
Теперь комбинируя формат с операторами условия можно написать вычисления (например, суммирование) по условию цвета.
Будем благодарны, если Вы нажмете +1 и/или Мне нравится внизу данной статьи или поделитесь с друзьями с помощью кнопок ниже.
В новых версиях Excel поддерживает более 4 млн. цветов. Настроить это богатство очень легко - идем на вкладку Разметка страницы - Цвета (Page Layout - Colors) и выбираем любую радующую вас палитру:
Цвета заботливо подобраны в гармоничные сочетания, эффект от применения видно уже при наведении мыши. Выбранная палитра будет применяться ко всем объектам (листам, ячейкам, диаграммам и т.д.) в пределах книги. Для маньяков мастеров дизайна в конце списка есть опция Создать новые цвета темы (New Theme Colors) , где можно попытаться выпилить свою палитру (например, с корпоративными цветами компании):
Excel 2003 и старше
Старые версии Excel имели очень ограниченную палитру - только 56 цветов. Это количество нельзя увеличить, но можно заменить стандартные цвета в этой палитре на свои, нестандартные. Для этого идем в меню Сервис - Параметры - вкладка Цвет (Tools - Options - Color) и меняем любой выбранный цвет стандартной палитры на свой собственный кнопкой Изменить (Edit) :
Обладая некоторым терпением, можно добиться, например, следующего результата:
На этой же вкладке Цвет можно копировать цвета из другой книги (она должна быть заранее открыта) при помощи выпадающего списка внизу окна. Например, можете скачать вот эту книгу с нестандартными цветами палитры и использовать их для своих таблиц.
Иногда цвета стандартной палитры сбиваются (например, после выгрузки из 1С в Excel). Кнопка Сброс (Reset) вам поможет.
У меня новый Excel 2007-2010, но я хочу цвета как в старом Excel 2000-2003
Тяжелый случай. Но бывает. Я с этим столкнулся, помнится, когда делал проект для клиента, работающего до сих пор на Excel 2003. Красивая палитра Excel 2010 превращалась в его файлах в непонятную цветовую кашу: зеленый мог стать желтым, а красный - оранжевым. Видимо, при сохранении в формате Excel 97-2003 преобразование из 4 млн. цветов в 65 бесследно не проходило.
Выход нашелся - бесплатная надстройка Classic Excel Colors от Andrew Engwirda, MVP Excel. Надстройка добавляет вам на ленту кнопку, открывающую окно с "теми-самыми старыми добрыми" цветами из палитры Excel 2003. Если использовать их, то цветовых искажений при работе с новыми файлами в старых версиях не будет:
Читайте также: