Перейти до основного матеріалу

Excel: якщо колір шрифту червоний, поверніть певний текст або виконайте інші операції

Як ви можете повернути певний текст, якщо колір шрифту червоний в іншій клітинці, як показано на знімку екрана нижче? У цій статті я розповім про деякі прийоми для виконання деяких операцій на основі тексту червоного шрифту в Excel.


Якщо колір шрифту червоний, поверніть певний текст в іншу клітинку

Щоб повернути певний текст, якщо колір шрифту червоний в іншій комірці, виконайте наступне:

1. Прес Alt + F11 клавіші одночасно, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. Потім натисніть кнопку Insert > Модулі, скопіюйте та вставте наведений нижче код 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
примітки: у наведеному вище коді, якщо колір шрифту червоний, повертається текст "Невдача», якщо не червоний, повернути текст «Проходити”. Ви можете змінити два тексти відповідно до ваших потреб.

3. Потім закрийте вікно коду та введіть цю формулу: =FontColorISRed(B2), а потім перетягніть маркер заповнення вниз, щоб отримати інші результати, перегляньте знімок екрана:


Якщо колір шрифту червоний, виділіть клітинку

Якщо ви хочете виділити клітинки червоним шрифтом, виконайте наступне:

1. Прес Alt + F11 клавіші одночасно, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. Потім натисніть кнопку Insert > Модулі, скопіюйте та вставте наведений нижче код 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. А потім закрийте вікно коду, перейдіть до клацання Головна > Умовне форматування > Нове правило, див. скріншот:

4. В вискочив Нове правило форматування у діалоговому вікні виконайте такі операції:

  • Натисніть За допомогою формули визначте, які клітинки потрібно форматувати в Виберіть тип правила вікно списку;
  • Введіть цю формулу =виділений червоний шрифт (B2) в Форматувати значення, де ця формула відповідає дійсності текстове вікно;
  • Потім натисніть кнопку сформований кнопки.

5, в Формат ячеек у діалоговому вікні під Заповнювати виберіть один колір, яким ви бажаєте виділити клітинку, перегляньте знімок екрана:

6. А потім натисніть OK > OK щоб закрити діалогові вікна. А тепер комірки з червоним шрифтом відразу підсвічуються, дивіться скріншот:


Якщо колір шрифту червоний, змініть колір шрифту

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

 Якщо колір шрифту червоний, змініть колір шрифту за допомогою функції «Знайти та замінити».

Щоб змінити червоний колір шрифту на інший, функція «Знайти та замінити» в Excel може зробити вам послугу, виконайте такі дії:

1. Виберіть діапазон даних, колір шрифту якого потрібно змінити, а потім натисніть Ctrl + H, ключі, щоб відкрити Знайти і замінити діалогове вікно. У відкритому діалоговому вікні натисніть Параметри>> , див. знімок екрана:

2. У розгорнутому діалоговому вікні виконайте такі дії:

  • Залиште Знайти те, що та Замінити ящики заготовки;
  • З правого боку Знайти те, що поле, виберіть сформований > Виберіть Формат із комірки, і клацніть клітинку з червоним шрифтом;
  • Потім, з правого боку Замінити поле, виберіть сформований > сформований йти до Замінити формат діалог

3, в Замінити формат в діалоговому вікні шрифт виберіть один колір, який потрібно змінити Колір розкривний список, перегляньте скріншоти:

4. Потім натисніть кнопку OK закрити Замінити формат діалогове вікно, а тепер натисніть замінити всі кнопка в Знайти і замінити у діалоговому вікні всі комірки з червоним шрифтом замінено кольором шрифту, який ви вказали, див. знімок екрана:

примітки: якщо ви виберете формат із наявної комірки, буде підібрано всі формати комірок. У цьому випадку під час виконання заміни, якщо формат не збігається повністю, клітинка не буде замінена.

 Якщо колір шрифту червоний, змініть колір шрифту за допомогою корисної функції

Якщо у вас є Kutools для Excel, З його Виберіть Клітини з форматом ви можете вибрати комірки з червоним шрифтом, а потім якомога швидше змінити колір шрифту відповідно до ваших потреб.

після установки Kutools для Excel, будь ласка, зробіть так:

1. Виберіть діапазон даних, який потрібно використовувати, а потім натисніть Кутулс > Select > Виберіть Клітини з форматом, див. скріншот:

2, в Виберіть Клітини з форматом діалогове вікно натисніть кнопку Виберіть Формат із комірки кнопку. Потім виберіть комірку з червоним шрифтом, усі атрибути цієї комірки відображаються у списку нижче. Якщо ви хочете вибрати всі комірки з таким самим форматуванням базової комірки, позначте всі параметри атрибутів; Якщо ви хочете лише вибрати клітинки лише червоним шрифтом, зніміть прапорці з усіх інших атрибутів, окрім Колір шрифту прапорець. Дивіться знімок екрана:

3. Потім натисніть кнопку OK і клацніть у вікні підказки Так, див. скріншот:

4. Усі комірки з червоним шрифтом виділяються одразу, а потім ви можете вказати колір шрифту, щоб змінити червоний шрифт за потреби. Перегляньте скріншот:


Найкращі інструменти для підвищення продуктивності офісу

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

  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці та Ведення даних; Вміст розділених комірок; Поєднуйте повторювані рядки та суму / середнє... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Улюблені та швидко вставлені формули, Діапазони, діаграми та зображення; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Групування зведеної таблиці за номер тижня, день тижня та багато іншого ... Показати розблоковані, заблоковані клітини за різними кольорами; Виділіть клітини, які мають формулу / назву...
вкладка kte 201905
  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations