Excel: Ако цветът на шрифта е червен, върнете конкретен текст или извършете други операции
Как можете да върнете конкретен текст, ако цветът на шрифта е червен в друга клетка, както е показано на екранната снимка по-долу? В тази статия ще представя някои трикове за извършване на някои операции въз основа на текста с червения шрифт в Excel.
Ако цветът на шрифта е червен, връща конкретен текст в друга клетка
Ако цветът на шрифта е червен, връща конкретен текст в друга клетка
За да върнете конкретен текст, ако цветът на шрифта е червен в друга клетка, моля, направете следното:
1, Натиснете Alt + F11 клавиши едновременно, за да отворите Microsoft Visual Basic за приложения прозорец.
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
3. След това затворете прозореца с код и въведете тази формула: =FontColorISRed(B2)и след това плъзнете манипулатора за попълване надолу, за да получите другите резултати, вижте екранната снимка:
Ако цветът на шрифта е червен, маркирайте клетката
Ако искате да маркирате клетките въз основа на червения шрифт, моля, направете следното:
1, Натиснете Alt + F11 клавиши едновременно, за да отворите Microsoft Visual Basic за приложения прозорец.
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. След това затворете прозореца с код, отидете на щракване Начало > Условно форматиране > Ново правило, вижте екранна снимка:
4. В изскочилото Ново правило за форматиране диалогов прозорец, направете следните операции:
- Кликнете Използвайте формула, за да определите кои клетки да форматирате в Изберете тип правило списъчна кутия;
- Въведете тази формула =маркиран шрифт (B2) в Форматиране на стойности, където тази формула е вярна текстово поле;
- След това кликнете върху формат бутон.
5. В Форматиране на клетки диалогов прозорец, под Напълнете изберете един цвят, който искате да маркирате клетката, вижте екранната снимка:
6. И след това щракнете OK > OK за затваряне на диалоговите прозорци. И сега клетките с червен шрифт са маркирани наведнъж, вижте екранната снимка:
Ако цветът на шрифта е червен, променете цвета на шрифта
Понякога може да искате да смените червения шрифт с друг цвят на шрифта, тук ще говоря за два метода за постигането му.
Ако цветът на шрифта е червен, променете цвета на шрифта с функцията за намиране и замяна
За да промените червения цвят на шрифта с друг, функцията за намиране и замяна в Excel може да ви направи услуга, моля, изпълнете следните стъпки:
1. Изберете диапазона от данни, на който искате да промените цвета на шрифта, и след това натиснете Ctrl + H за да отворите Търсене и заместване диалогов прозорец. В отворения диалог щракнете върху Опции>> бутон, вижте екранната снимка:
2. В разгънатия диалогов прозорец направете следните операции:
- Остави Намерете това, намлява Заменете със празни кутии;
- От дясната страна на Намерете това, полето, изберете формат > Изберете Форматиране от клеткаи щракнете върху клетка с червен шрифт;
- След това от дясната страна на Заменете със полето, изберете формат > формат за да отидете на Замяна на формат диалогов прозорец.
3. В Замяна на формат диалогов прозорец под Font изберете един цвят, който искате да промените от Цвят падащ списък, вижте екранни снимки:
4, След това кликнете върху OK за да затворите Замяна на формат и сега щракнете върху Замести всички бутон в Търсене и заместване диалоговия прозорец, всички клетки с червен шрифт се заменят с цвета на шрифта, който сте посочили, вижте екранната снимка:
Ако цветът на шрифта е червен, променете цвета на шрифта с полезна функция
Ако имате Kutools за Excel, Със своята Изберете Клетки с формат можете да изберете клетките с червен шрифт и след това да промените цвета на шрифта според вашите нужди възможно най-бързо.
След инсталиране Kutools за Excel, моля, направете следното:
1. Изберете диапазона от данни, който искате да използвате, и след това щракнете Kutools > Изберете > Изберете Клетки с формат, вижте екранна снимка:
2. В Изберете Клетки с формат кликнете върху Изберете Форматиране от клетка бутон. И след това изберете клетка с червен шрифт, всички атрибути на тази клетка се показват в полето със списък по-долу. Ако искате да изберете всички клетки с точно същото форматиране на основната клетка, моля, проверете всички опции за атрибути; Ако просто искате да изберете клетките само с червен шрифт, премахнете отметката от всички други атрибути, с изключение на Цвят на шрифта отметка. Вижте екранна снимка:
3, След това кликнете върху OK и в следното подканващо поле щракнете върху Да, вижте екранна снимка:
4. Всички клетки с червен шрифт се избират наведнъж и след това можете да посочите цвят на шрифта, за да промените червения шрифт според нуждите си. Вижте екранна снимка:
Най-добрите инструменти за производителност в офиса
Kutools за Excel решава повечето от вашите проблеми и увеличава вашата производителност с 80%
- Супер Формула Бар (лесно редактиране на няколко реда текст и формула); Оформление за четене (лесно четене и редактиране на голям брой клетки); Поставяне във филтриран диапазон...
- Обединяване на клетки/редове/колони и съхраняване на данни; Съдържание на разделени клетки; Комбинирайте дублиращи се редове и сума/средно... Предотвратяване на дублиращи се клетки; Сравнете диапазони...
- Изберете Дублиран или Уникален редове; Изберете Празни редове (всички клетки са празни); Super Find и Fuzzy Find в много работни тетрадки; Произволен избор...
- Точно копие Множество клетки без промяна на референтната формула; Автоматично създаване на препратки към множество листа; Вмъкване на куршуми, квадратчета за отметка и други...
- Любими и бързо вмъкнати формули, диапазони, диаграми и снимки; Шифроване на клетки с парола; Създаване на пощенски списък и изпращайте имейли...
- Извличане на текст, Добавяне на текст, Премахване по позиция, Премахване на пространството; Създаване и отпечатване на междинни суми за пейджинг; Конвертиране на съдържание и коментари между клетки...
- Супер филтър (запазване и прилагане на филтърни схеми към други листове); Разширено сортиране по месец/седмица/ден, честота и други; Специален филтър с удебелен шрифт, курсив...
- Комбинирайте работни тетрадки и работни листове; Обединяване на таблици въз основа на ключови колони; Разделете данните на няколко листа; Пакетно конвертиране на xls, xlsx и PDF...
- Групиране на обобщена таблица по номер на седмицата, ден от седмицата и други... Показване на отключени, заключени клетки с различни цветове; Маркирайте клетки, които имат формула/име...
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
