Перейти к содержимому

Kutools для Office — один пакет. Пять инструментов. Выполняйте больше.

Excel: Если цвет шрифта красный, вернуть определенный текст или выполнить другие операции

Author Xiaoyang Last modified

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

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


Если цвет шрифта красный, вернуть определенный текст в другой ячейке

Когда вы хотите вернуть определенный текст (например, «Fail» или «Pass») в другой ячейке, в зависимости от того, является ли цвет шрифта в ссылочной ячейке красным, стандартная формула не будет работать, поскольку функции Excel не могут по умолчанию проверять цвет шрифта. Чтобы достичь этого, вы можете использовать пользовательскую функцию VBA, также известную как Пользовательская функция (UDF). Это подходит, если вам нужно динамически отображать результаты, которые всегда актуальны при изменениях цвета шрифта. Убедитесь, что все пользователи книги имеют включенные макросы для корректной работы функции.

1. Одновременно нажмите Alt + F11, чтобы открыть окно редактора Microsoft Visual Basic for Applications.

2. Далее выберите Вставка > Модуль. В открывшемся окне модуля скопируйте и вставьте следующий код VBA:

Код VBA: Если цвет шрифта красный, вернуть определенный текст

Function FontColorisRed(Rng As Range)
'Updateby ExtendOffice
    Application.Volatile
    If Rng.Font.ColorIndex = 3 Then
    FontColorisRed = "Fail"
    Else
    FontColorisRed = "Pass"
    End If
End Function
Примечание: В приведенном выше коде, если цвет шрифта красный, функция вернет «Fail», в противном случае она вернет «Pass». Вы можете изменить эти возвращаемые тексты в соответствии с вашими потребностями. Также, если вы работаете с пользовательскими оттенками красного (не стандартный красный Excel), может потребоваться соответствующая корректировка кода цвета в VBA.

3. Закройте редактор VBA. Теперь в ячейке листа введите следующую формулу (например, в ячейке C2): =FontColorISRed(B2), а затем протяните маркер заполнения вниз, чтобы применить формулу для других строк. Результат мгновенно покажет «Fail», если цвет шрифта в ссылочной ячейке красный.

apply a formula to return a specific text if font color is red

Если формула не обновляется после изменения цвета шрифта в ссылочных ячейках, попробуйте нажать F9 или повторно ввести формулу для обновления результата. Имейте в виду, что, как и в случае со всеми решениями VBA, ваш файл должен быть сохранен как книга с поддержкой макросов (.xlsm), и макросы должны быть включены для использования этой функции.

a screenshot of kutools for excel ai

Раскройте магию Excel с Kutools AI

  • Умное выполнение: Выполняйте операции с ячейками, анализируйте данные и создавайте диаграммы — всё это посредством простых команд.
  • Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации ваших рабочих процессов.
  • Кодирование VBA: Пишите и внедряйте код VBA без особых усилий.
  • Интерпретация формул: Легко разбирайтесь в сложных формулах.
  • Перевод текста: Преодолейте языковые барьеры в ваших таблицах.
Улучшите возможности Excel с помощью инструментов на базе ИИ. Скачать сейчас и испытайте беспрецедентную эффективность!

Если цвет шрифта красный, выделить ячейку

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

1. Откройте редактор VBA, нажав Alt + F11.

2. Нажмите Вставка > Модуль и вставьте следующий код VBA в окно модуля:

Код VBA: Если цвет шрифта красный, выделить ячейку

Function HighlightRedFont(pRg As Range) As Boolean
'Updateby ExtendOffice
Dim xRg As Range
Dim xBol As Boolean
xBol = False
    For Each xRg In pRg
        If xRg.Font.Color = vbRed Then
            xBol = True
        End If
    Next
  HighlightRedFont = xBol
End Function

3. Закройте редактор VBA и вернитесь в Excel. Перейдите на вкладку Главная > Условное форматирование > Новое правило, как показано ниже:

click Home > Conditional Formatting > New Rule

4. В диалоговом окне Новое правило форматирования выполните следующие шаги:

  • В разделе Выберите тип правила выберите Использовать формулу для определения ячеек, к которым нужно применить форматирование.
  • Введите эту формулу в поле формулы (например, применяя к B2): =highlightredfont(B2)
  • Нажмите кнопку Формат, чтобы задать желаемые параметры выделения.

specify the options in the dialog box

5. В диалоговом окне Формат ячеек перейдите на вкладку Заливка и выберите цвет выделения для ячеек. Нажмите OK, чтобы подтвердить выбор:

choose one color to highlight the cell

6. Нажмите OK дважды (по одному разу для каждого диалогового окна), чтобы применить правило. Ячейки с красным шрифтом теперь будут автоматически выделены в соответствии с вашими настройками, как показано здесь:

the cells with red font are highlighted

Если условное форматирование не обновляется после изменения цвета шрифта, попробуйте отредактировать затронутую ячейку или нажать F9 для обновления. Помните, что этот метод зависит от наличия пользовательской функции VBA и включенных макросов.


Если цвет шрифта красный, изменить цвет шрифта

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

 Если цвет шрифта красный, изменить цвет шрифта с помощью функции «Найти и заменить»

Функция «Найти и заменить» Excel поддерживает поиск и замену по форматированию, позволяя выбрать все ячейки с определенным цветом шрифта (например, красным) и изменить их на другой цвет эффективно. Этот метод хорош для быстрых операций по всему листу или диапазону и не требует макросов или надстроек.

1. Выберите диапазон, где вы хотите изменить цвет шрифта, затем нажмите Ctrl + H, чтобы открыть диалоговое окно «Найти и заменить». Нажмите Дополнительные параметры >> для дополнительных настроек, как показано:

click Options in the dialog box

2. В расширенном диалоге выполните следующие действия:

  • Оставьте поля «Что найти» и «На что заменить» пустыми, чтобы сосредоточиться на форматировании.
  • Рядом с полем «Что найти», нажмите Формат > Выбрать формат из ячейки, затем щелкните ячейку с красным шрифтом, которую вы хотите нацелить.
  • Рядом с полем «На что заменить», нажмите Формат > Формат, чтобы открыть диалоговое окно Заменить формат.

select Format > Choose Format From Cell, and click on a cell with red font

select Format > Format to go to the Replace Format dialog

3. В диалоговом окне Заменить формат, на вкладке Шрифт выберите желаемый цвет замены из выпадающего списка Цвет. Подтвердите ваши настройки:

choose one color to change

4. Нажмите OK, чтобы закрыть диалоговое окно Заменить формат. Наконец, в диалоговом окне «Найти и заменить» нажмите Заменить все. Все ячейки с выделенным красным шрифтом немедленно изменят свой цвет на выбранный новый цвет шрифта:

all the cells with red font are replaced with the font color you specified

Примечание: При использовании «Выбрать формат из ячейки» все свойства форматирования будут использованы для совпадения — не только цвет шрифта. Если ваши ячейки различаются по размеру шрифта, жирности или другим форматам, будут заменены только точные совпадения. Для достижения наилучших результатов убедитесь, что целевые ячейки имеют одинаковое форматирование, кроме цвета.

Этот метод особенно полезен, когда вы хотите выполнить одноразовую массовую операцию без включения макросов. Однако, если ваша книга регулярно меняет цвет шрифта как часть рабочего процесса, рассмотрите использование автоматического или выборочного решения.


 Если цвет шрифта красный, изменить цвет шрифта с помощью полезной функции

Если у вас установлена Kutools для Excel, ее функция Выбрать ячейки с форматом позволяет быстро выбрать все ячейки с точно таким же цветом шрифта (например, красным) и затем применить новый цвет шрифта массово. Этот метод более гибкий, чем базовая функция «Найти и заменить», потому что вы можете ограничить выбор только цветом шрифта или включать/исключать другие конкретные атрибуты по необходимости. Kutools предоставляет удобный интерфейс для этих операций, что делает его идеальным для пользователей, которые часто управляют богатым форматированием в больших наборах данных.

Kutools для Excel предлагает более 300 продвинутых функций для упрощения сложных задач, повышая креативность и эффективность. Интеграция с возможностями ИИ позволяет Kutools автоматизировать задачи с высокой точностью, делая управление данными без усилий. Подробная информация о Kutools для Excel...  Бесплатная пробная версия...

После установки Kutools для Excel выполните следующие шаги:

1. Выберите диапазон для операции, затем перейдите в Kutools > Выбрать > Выбрать ячейки с форматом, как показано ниже:

click Kutools > Select > Select Cells with Format

2. В диалоговом окне Выбрать ячейки с форматом нажмите Выбрать формат из ячейки, затем выберите ячейку с красным шрифтом. Вы можете настроить, какие свойства форматирования должны совпадать — в этом случае оставьте только Цвет шрифта отмеченным, чтобы совпали все ячейки, использующие этот красный шрифт, независимо от других форматов.

set options in the dialog box

3. Нажмите OK. В появившемся диалоговом окне нажмите Да, чтобы продолжить:

click Yes in the dialog box

4. Все ячейки с красным цветом шрифта теперь выбраны сразу. С этими выбранными ячейками вы можете вручную изменить их цвет шрифта с помощью выпадающего меню цвета шрифта в Excel по необходимости.

specify a font color to change the red font

Этот подход особенно эффективен для больших диапазонов данных или ситуаций, требующих выборочной корректировки форматирования только на основе цвета. При использовании этой функции будьте внимательны, чтобы проверить, что выбраны только желаемые атрибуты форматирования — иначе вы можете пропустить ячейки, которые визуально похожи, но имеют незначительные различия в форматировании.

Совет: Kutools также предлагает функции пакетной обработки и отмены, которые могут помочь предотвратить ошибки и быстро отменить изменения, если вы допустите ошибку во время операций выбора или форматирования.

Если вы столкнулись с неожиданными результатами или желаемые ячейки не выбраны, дважды проверьте, что только правильные атрибуты форматирования (например, цвет шрифта) отмечены в диалоговом окне. Также убедитесь, что вы работаете в пределах целевого диапазона данных.


Помимо вышеупомянутых методов, существуют другие способы обработки данных на основе цвета шрифта в Excel:

  • VBA пакетный код обработки: Если вам часто нужно работать с большими наборами данных, пользовательский скрипт VBA может перебирать все ячейки и выполнять действия при обнаружении красного шрифта. Это гибко для массового форматирования, пометки или регистрации совпадающих ячеек, но требует базовых знаний программирования на VBA.
  • Ручной просмотр в сочетании с сортировкой: Используйте функцию Excel Сортировка по цвету ячейки или цвету шрифта (доступна в Excel 2007 и выше), чтобы группировать данные с красным шрифтом вместе для более легкого просмотра или редактирования. Это особенно подходит для одноразовых задач или когда использование макросов/надстроек не разрешено.

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

Подводя итог, операции на основе цвета шрифта в Excel требуют больше, чем просто встроенных формул. Выбор правильного инструмента — VBA, встроенных функций Excel или надстроек, таких как Kutools — будет зависеть от частоты и сложности вашего рабочего процесса. Какой бы метод вы ни выбрали, всегда дважды проверяйте коды цветов, выбор атрибутов форматирования и настройки безопасности макросов, чтобы обеспечить эффективные и точные результаты.


Лучшие инструменты для повышения производительности Office

Kutools для Excel решает большинство ваших проблем и увеличивает вашу продуктивность на 80%

  • Супер строка формул (легкое редактирование нескольких строк текста и формул); Режим чтения (удобное чтение и редактирование большого количества ячеек); Вставка в отфильтрованный диапазон...
  • Объединение ячеек/строк/столбцов с сохранением данных; Разделение содержимого ячеек; Объединение дублирующихся строк с подсчетом суммы/среднего значения... Предотвращение дублирования ячеек; Сравнение диапазонов...
  • Выбор дублирующихся или уникальных строк; Выбор пустых строк (все ячейки пустые); Супер поиск и нечеткий поиск во многих книгах; Случайный выбор...
  • Точное копирование нескольких ячеек без изменения ссылок на формулы; Автоматическое создание ссылок на несколько листов; Вставка маркеров, флажков и многое другое...
  • Избранные и быстрая вставка формул, диапазонов, диаграмм и изображений; Шифрование ячеек с паролем; Создание списка рассылки и отправка электронных писем...
  • Извлечение текста, добавление текста, удаление по позиции, удаление пробелов; Создание и печать статистики страниц; Преобразование между содержимым ячеек и комментариями...
  • Супер фильтр (сохранение и применение схем фильтрации к другим листам); Расширенная сортировка по месяцу/неделе/дню, частоте и другим параметрам; Специальный фильтр по жирному шрифту, курсиву...
  • Объединение книг и листов; Объединение таблиц на основе ключевых столбцов; Разделение данных на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Группировка сводной таблицы по номеру недели, дню недели и другим параметрам... Отображение разблокированных, заблокированных ячеек разными цветами; Выделение ячеек, содержащих формулы/имена...
kte tab 201905
  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов в новых вкладках одного окна, а не в новых окнах.
  • Увеличивает вашу продуктивность на 50% и экономит сотни кликов мышью каждый день!
officetab bottom