VectorXXX Пользователь Сообщений: 14 |
#1 07.04.2016 13:57:06 Здравствуйте, помогите пожалуйста решить следующую проблему:
Прикрепленные файлы
Изменено: VectorXXX — 07.04.2016 22:54:26 |
||
vikttur Пользователь Сообщений: 47199 |
#2 07.04.2016 14:04:03
Может быть, посмотреть с другой стороны — обойтись без формулы и все вычислять в коде? |
||
VectorXXX Пользователь Сообщений: 14 |
к сожалению не тот у меня уровень знаний) |
Udik Пользователь Сообщений: 372 excel 2016х64 Контакты в профиле |
Чтобы именно формулами цвет ячейки получать это пользовательскую функцию писать надо. Арфы — нет, возьмите бубен. |
Фродо Пользователь Сообщений: 348 |
#5 07.04.2016 17:03:24
Изменено: Фродо — 07.04.2016 22:54:59 у меня простая версия Экселя, в ней нет кнопки «Прочитать мысли и сгенерировать файл пример» |
||
ts-79 Пользователь Сообщений: 246 |
Критичен ли цвет в столбце F? Или там могут быть и другие значения? Изменено: ts-79 — 07.04.2016 18:01:54 |
Фродо Пользователь Сообщений: 348 |
насколько я помню стандартные функции не могут узнать какой цвет у шрифта на всякий случай выложу свой пример через УДФ, может пригодится . у меня простая версия Экселя, в ней нет кнопки «Прочитать мысли и сгенерировать файл пример» |
bedvit Пользователь Сообщений: 2477 Виталий |
Кроме ЯЧЕЙКА(«формат»;…) со скудным функционалом, не припомню стандартных функций отслеживающих цвет шрифта. «Бритва Оккама» или «Принцип Калашникова»? |
VectorXXX Пользователь Сообщений: 14 |
#9 07.04.2016 18:38:23
не всегда в примечаниях пишут спец цена, бывают всякие акции и тд. |
||
VectorXXX Пользователь Сообщений: 14 |
#10 07.04.2016 23:26:21 Фродо, Спасибо большое, взял Вашу функцию. |
В этом посте мы покажем вам, как найти и заменить цвет текста в Excel. Цвет текста, также известный как передний цвет, — это цвет, в котором текст отображается в Microsoft Excel. По умолчанию установлено значение «Черный». Вы можете вручную изменить цвет текста для части текста или всего текста в ваших данных Excel, используя параметр «Цвет шрифта». В некоторых случаях данные могут содержать несколько вхождений одного и того же текста, цвет которого необходимо изменить. Если ваш файл Excel довольно большой, изменение переднего цвета вручную будет утомительным и трудоемким. В этом посте мы покажем вам, как использовать функцию «Найти и заменить» для изменения цвета текста в Excel.
Найти и заменить — полезная функция в программах пакета Office, которая позволяет заменить существующий текст новым текстом. Однако его также можно использовать для поиска и замены цвета текста. Вы можете использовать эту функцию, чтобы изменить передний цвет один за другим для каждого вхождения текста, или использовать «Заменить все», чтобы обновить передний цвет за один раз. Давайте разберемся в этом с помощью примера.
Предположим, у нас есть рабочий лист, в котором у нас есть таблица, в которой перечислены заголовки сообщений и имена авторов сообщений, опубликованных в TheWindowsClub в определенный день (см. изображение выше). Теперь предположим, что мы хотим изменить цвет текста для имени конкретного автора «Гуру Мандади», который внес наибольший вклад в этот день.
Мы можем сделать это вручную следующим образом:
- Выберите первое вхождение «Гуру Мандади», поместив курсор в ячейку C1.
- Нажмите и удерживайте кнопку Ctrl на клавиатуре и щелкните по всем другим вхождениям «Guru Mandadi» один за другим.
- Щелкните раскрывающийся список «Цвет шрифта» на панели инструментов «Шрифт» вверху.
- Нажмите на цвет, который должен заменить существующий передний цвет.
Используйте «Найти и заменить», чтобы изменить цвет текста в Excel
Хотя это может показаться простым и легким, ручное изменение переднего цвета может быть не идеальным подходом для больших баз данных, где текст может появляться сотни или тысячи раз в разных местах электронной таблицы. В таких случаях вы можете использовать функцию «Найти и заменить». Для приведенного выше примера это работает следующим образом:
- Выберите диапазон ячеек, в котором необходимо заменить цвет текста. Если это вся электронная таблица, ничего не выбирайте.
- Щелкните раскрывающийся список «Найти и выбрать» на панели инструментов «Редактирование» в правом верхнем углу.
- Нажмите на опцию «Заменить».
- В диалоговом окне «Найти и заменить» нажмите кнопку «Параметры». Это расширит диалоговое окно и покажет дополнительные параметры.
- Введите текст в поле «Найти». В приведенном выше примере мы ввели в это поле «Гуру Мандади».
- Щелкните раскрывающийся список «Формат» рядом с полем «Заменить на».
- Выберите параметр Формат.
- В диалоговом окне «Заменить формат» щелкните раскрывающийся список «Цвет» и выберите цвет, который должен заменить существующий цвет указанного текста.
- Нажмите кнопку ОК.
- Нажмите кнопку «Заменить все» в диалоговом окне «Найти и заменить», чтобы применить новый цвет к тексту.
Excel сообщит вам о количестве замен, сделанных на всем листе или в выбранном диапазоне ячеек.
Примечание. Вы также можете использовать другие параметры форматирования, доступные в диалоговом окне «Заменить формат», чтобы изменить внешний вид текста, например стиль шрифта, размер и т. д.
Читайте также: Как изменить цвет вкладки рабочего листа Excel.
Если вы хотите, вы можете просмотреть вхождения текста одно за другим и заменить передний цвет, используя параметры «Найти далее» и «Заменить». Вот как:
- Выполните шаги 1-9, как описано выше.
- В диалоговом окне «Найти и заменить» нажмите кнопку «Найти далее».
- Фокус мыши появится при первом появлении указанного текста.
- Чтобы изменить передний цвет, нажмите «Заменить». В противном случае ничего не нажимайте.
- Снова нажмите кнопку «Найти далее».
- Фокус мыши появится при следующем появлении указанного текста.
- Нажмите «Заменить», чтобы заменить цвет текста.
- Повторяйте этот процесс, пока не сделаете столько замен цвета текста, сколько хотите.
Это заканчивается тем, как найти и заменить цвет текста в Excel.
Нажмите Ctrl+F, чтобы открыть диалоговое окно «Найти и заменить». Перейдите на вкладку «Заменить». Нажмите кнопку «Параметры». Введите нужный текст в поле «Найти». Выберите параметр «Формат» в меню «Формат» рядом с полем «Заменить на». Перейдите на вкладку «Заливка» в диалоговом окне «Заменить формат». Выберите цвет из палитры «Цвет фона» и нажмите «ОК». Нажмите кнопку «Заменить все», чтобы выделить все вхождения указанного текста.
На чтение 3 мин. Просмотров 1.1k. Опубликовано 15.12.2019
Содержание
- Описание работы
- Зачем это нужно?
- Код на VBA
- Изменение цвета текста в ячейке или диапазоне
- Применение дополнительного цвета
- Форматирование цвета ярлычка листа
Описание работы
Функция =ЦВЕТШРИФТА(ЯЧЕЙКА) возвращает код цвета шрифта указанной ячейки. Функция имеет один обязательный аргумент.
- ЯЧЕЙКА — ссылка на ячейку, цвет шрифта которой необходимо определить.
Ниже представлен пример, демонстрирующий работу функции.
Следует обратить внимание на тот факт, что функция не пересчитывается автоматически. Это связано с тем, что изменение цвета шрифта ячейки Excel не приводит к пересчету формул. Для пересчета формулы необходимо пользоваться сочетанием клавиш Ctrl+Alt+F9
Зачем это нужно?
С помощью данной функции, мы можете быстро сортировать ячейки с определенным цветом шрифта, подсчитывать их количество. К примеру, можно создать отдельный столбец и протянуть в нем данную функцию, для того, чтобы по этому столбцу быстро отсортировать строки с различным шрифтом. Можно создать сводную таблицу, в которой будет вестись подсчет ячеек с заданным цветом шрифта.
Код на VBA
Вы можете самостоятельно внедрить данную функцию в Excel или установить надстройку.
Для Excel — 2007 на главной панели выбираете «Условное форматирование» — «Правила выделения ячеек» — «Другие правила» — «Использовать формулу для определения форматируемых ячеек» — «Форматировать значения, для которых следующая формула является истинной»
Далее задаёте формулу и формат (в Вашем случае — цвет выделения текста) .
Примечание: Мы стараемся как можно оперативнее обеспечивать вас актуальными справочными материалами на вашем языке. Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Просим вас уделить пару секунд и сообщить, помогла ли она вам, с помощью кнопок внизу страницы. Для удобства также приводим ссылку на оригинал (на английском языке).
Данные на листах можно сделать более удобными для восприятия, изменив цвет шрифта в ячейках или диапазонах, цвет ярлычков листов или формул.
Сведения о том, как изменить цвет фона ячеек или применить узоры или цвета заливки, см. в разделе Добавление или изменение цвета фона ячеек.
Изменение цвета текста в ячейке или диапазоне
Выделите ячейку или диапазон ячеек с данными, которые вы хотите отформатировать. Вы также можете выбрать часть текста в ячейке.
На вкладке Главная щелкните стрелку рядом с кнопкой Цвет шрифта .
Выберите цвет в группе Цвета темы или Стандартные цвета.
Совет: Чтобы применить последний выбранный цвет текста, на вкладке Главная нажмите кнопку Цвет текста.
Применение дополнительного цвета
Если вам нужен определенный цвет текста, вот как можно его получить:
На вкладке Главная щелкните стрелку рядом с кнопкой Цвет текста и выберите команду Другие цвета.
На вкладке Спектр в поле Цвета выберите нужный цвет.
Если вы знаете числовые значения составляющих нужного цвета, в поле Цветовая модель выберите модель RGB (Red, Green, Blue — красный, зеленый, синий) или HSL (Hue, Sat, Lum — тон, насыщенность, яркость), а затем введите числа, в точности соответствующие искомому цвету.
Совет: Чтобы быстро скопировать используемый цвет текста в другие ячейки, выделите исходную ячейку и дважды нажмите кнопку Формат по образцу . Затем щелкните ячейки, которые нужно отформатировать. По завершении еще раз нажмите кнопку Формат по образцу, чтобы выйти из этого режима.
Форматирование цвета ярлычка листа
Щелкните правой кнопкой мыши ярлычок листа, цвет которого вы хотите изменить.
Щелкните Цвет ярлычка, а затем выберите нужный цвет.
Изменится цвет ярлычка, но не цвет шрифта. При выборе темного цвета ярлычка цвет шрифта меняется на белый, а при выборе светлого цвета — на черный.
Как определить цвет заливки ячейки
Функция =ЦВЕТЗАЛИВКИ(ЯЧЕЙКА) возвращает код цвета заливки выбранной ячейки. Имеет один обязательный аргумент:
- ЯЧЕЙКА — ссылка на ячейку, для которой необходимо применить функцию.
Ниже представлен пример, демонстрирующий работу функции.
Следует обратить внимание на тот факт, что функция не пересчитывается автоматически. Это связано с тем, что изменение цвета заливки ячейки Excel не приводит к пересчету формул. Для пересчета формулы необходимо пользоваться сочетанием клавиш Ctrl+Alt+F9
Пример использования
Так как заливка ячеек значительно упрощает восприятие данных, то пользоваться ей любят практически все пользователи. Однако есть и большой минус — в стандартном функционале Excel отсутствует возможность выполнять операции на основе цвета заливки. Нельзя просуммировать ячейки определенного цвета, посчитать их количество, найти максимальное и так далее.
С помощью функции ЦВЕТЗАЛИВКИ все это становится выполнимым. Например, «протяните» данную формулу с цветом заливки в соседнем столбце и производите вычисления на основе числового кода ячейки.
Иногда возникает необходимость изменить, определить цвет ячейки для копирования, закрасить определенную область, придав тем самым неповторимые и выразительные черты таблице данных.
В этой статье мы рассмотрим как вручную можно менять цвет ячейки, а так же как прописать в VBA изменение цвета диапазона ячеек или одной выделенной ячейки.
Начнем с простого. На главной панели инструментов ленты находится панель Формата Ячеек:
Для того, чтобы изменить цвет ячейки (диапазона ячеек) нам необходимо выделить ее, после чего на Панели инструментов выбрать необходимый цвет. Так же можно задать другие цвета, выбрав их из палитры. Панель инструментов меняет так же цвет текста, размер шрифта и формат границы ячейки.
Теперь зададим формат ячейки пользуясь контекстным меню, для чего кликнем правой кнопкой мыши на ячейке и в открывшемся списке выберем «Формат Ячеек»:
На вкладке «Заливка» можно выбрать цвет фона и узор.
Рассмотрим несколько иную ситуацию. Допустим вы хотите скопировать цвет ячейки (и формат) с существующей и применить к своим ячейкам. Воспользуемся кнопкой на главной панели «Формат по образцу» («метелочка»):
Таким образом, для того, чтобы скопировать формат необходимо выделить интересующую нас ячейку, нажать на «метелочку» и кликнуть по ячейке, формат которой мы хотим задать.
Аналогичные операции можно описать и в Макросах. Если есть необходимость вставить в код условие, по которому будет меняться формат ячейки или проводиться суммирование ячеек с определенным цветом или шрифтом, то проведя операции копирования формата с записью макроса, можно увидеть что:
Задать цвет ячейке (A1 окрашивается в Желтый):
Скопировать формат ячейки (формат A1 копируется на A3):
Теперь комбинируя формат с операторами условия можно написать вычисления (например, суммирование) по условию цвета.
Будем благодарны, если Вы нажмете +1 и/или Мне нравится внизу данной статьи или поделитесь с друзьями с помощью кнопок ниже.
Как узнать цвет ячейки excel
Функция CellColor
Данная функция позволяет определить внутренний числовой Excel код цвета заливки любой указанной ячейки. Это дает возможность пользователю впоследствии производить сортировку и фильтрацию ячеек по цвету, что часто бывает необходимо.
Синтаксис
=CellColor( cell )
- cell — ячейка, для которой нужно определить код цвета заливки
Примечания
К сожалению, поскольку Excel формально не считает смену цвета изменением содержимого листа, то эта функция не будет пересчитываться автоматически при изменении форматирования — обновление значений этой функции происходит только при нажатии сочетания клавиш полного пересчета листа Ctrl+Alt+F9.
Также (в силу ограничений самого Excel), данная функция не может считывать код цвета, если было использовано условное форматирование.
Если для ячейки не установлен цвет заливки, то код = -4142.
Если нужен RGB-код цвета, то используйте функцию RGBCellColor.
Если нужен код цвета не заливки, а шрифта, то используйте функцию CellFontColor.
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