Търсете и маркирайте резултатите от търсенето в Excel
В Excel можете да използвате функцията Намиране и замяна, за да намерите конкретна стойност, но знаете ли как да маркирате резултатите от търсенето след търсене? В тази статия представям два различни начина, които да ви помогнат да търсите и да маркирате резултатите от търсенето междувременно в Excel.
Търсете и маркирайте резултатите от търсенето чрез VBA кода
Търсете и маркирайте резултатите от търсенето чрез условното форматиране
Търсете и маркирайте резултатите от търсенето с удобен инструмент
В Excel има VBA код, който може да ви помогне да търсите стойност и след това да маркирате резултатите от търсенето.
1. Активирайте листа, в който искате да търсите, и маркирайте резултатите, натиснете Alt + F11 бутони за отваряне Microsoft Visual Basic за приложения прозорец.
2. кликване Поставете > Модулии поставете кода по-долу в новия модул.
VBA: Маркирайте резултатите от търсенето
Sub FindRange()
'UpdatebyExtendoffice20190813
Dim xRg As Range
Dim xFRg As Range
Dim xStrAddress As String
Dim xVrt As Variant
xVrt = Application.InputBox(prompt:="Search:", Title:="www.extendoffice.com")
If xVrt <> "" Then
Set xFRg = ActiveSheet.Cells.Find(what:=xVrt)
If xFRg Is Nothing Then
MsgBox prompt:="Cannot find this value", Title:="www.extendoffice.com"
Exit Sub
End If
xStrAddress = xFRg.Address
Set xRg = xFRg
Do
Set xFRg = ActiveSheet.Cells.FindNext(After:=xFRg)
Set xRg = Application.Union(xRg, xFRg)
Loop Until xFRg.Address = xStrAddress
If xRg.Count > 0 Then
xRg.Interior.ColorIndex = 8
xRsp = MsgBox(prompt:="Do you want to cancel highlighting?", Title:="www.extendoffice.com", Buttons:=vbQuestion + vbOKCancel)
If xRsp = vbOK Then xRg.Interior.ColorIndex = xlNone
End If
End If
End Sub
3. Натиснете F5 ключ, след което се появява поле за търсене, за да въведете посочената стойност, която търсите.
4. кликване OK, съответстващите резултати са маркирани с фонов цвят. Освен това се появява диалогов прозорец, който ви пита дали да отмените маркирането. Кликнете OK за да отмените маркирането и да затворите диалоговия прозорец, щракнете Отказ за да запазите маркирането и да затворите диалоговия прозорец.
Забележка:
1. Ако няма намерена съответстваща стойност, се появява диалогов прозорец, за да ви напомни.
2. Този VBA работи за целия активен лист и не е чувствителен към главни и малки букви.
Искате ли да получите увеличение на заплатата и много време да прекарвате със семейството си? Разделът Office подобрява вашата ефективност с 50% в Microsoft Office, работещ точно сега Невероятно, работата с два или повече документа е по-лесна и по-бърза от работата с един. В сравнение с добре познатите браузъри, инструментът с раздели в Office Tab е по-мощен и по-ефективен. Намалете стотиците щраквания с мишката и писането от клавиатурата всеки ден вместо вас, кажете сбогом на ръката с мишката сега. Ако обикновено работите с множество документи, Office Tab ще ви спести чудесно време. 30-дневен безплатен пробен период, не се изисква кредитна карта. |
В Excel функцията за условно форматиране също може автоматично да маркира резултатите от търсенето.
Да предположим, че данните и полето за търсене се показват като екранната снимка по-долу, сега, моля, направете следните стъпки:
1. Изберете диапазона, в който искате да търсите, и щракнете Начало > Условно форматиране > Ново правило.
2. В Ново правило за форматиране диалогов прозорец, изберете Използвайте формула, за да определите кои клетки да форматирате в Изберете тип правило раздел, след което отидете в текстовото поле под Форматиране на стойности, където тази формула е вярна, Тип =И($E$2<>"",$E$2=A4).
E2 е клетката, в която ще поставите стойността за търсене, а A4 е първата клетка в диапазона, в който търсите.
3. кликване формат бутон, отидете на Форматиране на клетки диалог, под Напълнете изберете един цвят, който ви е необходим. Кликнете OK > OK за затваряне на диалоговите прозорци.
Отсега нататък, когато въведете ключовата дума в клетка E2, резултатите от търсенето ще бъдат автоматично маркирани в посочения диапазон.
Ако искате да търсите две или повече стойности и да маркирате резултатите от търсенето веднъж, то Маркирайте ключова дума функция на Kutools за Excel може да ви направи услуга.
1. Изберете диапазона от данни, който искате да търсите, щракнете върху Kutools > Текст > Маркирайте ключова дума.
2. В изскачащия диалогов прозорец въведете стойностите, които искате да търсите и разделени със запетая Ключова дума текстово поле. След това изберете Маркирайте Опции и цвета на шрифта според нуждите ви. Кликнете Ok.
Ако искате да търсите стойност с малки и главни букви, поставете отметка Съвпадение отметката.
След това съответстващите резултати ще бъдат маркирани с различен цвят на шрифта.
С Маркирайте ключова дума функция, можете също да намерите част от низ в диапазона. Да предположим, че клетките за търсене съдържат топка или скок, въведете топка, скок в Ключова дума текстово поле, след това задайте настройките и щракнете Ok.
Примерен файл
Кликнете, за да изтеглите примерния файл
Преброяване/сумиране на клетки по цветове с условно форматиране в Excel
Сега този урок ще ви каже някои удобни и лесни методи за бързо преброяване или сумиране на клетките по цвят с условно форматиране в Excel.
Създайте диаграма с условно форматиране в Excel
Например, имате таблица с резултати на клас и искате да създадете диаграма, за да оцветите резултати в различни диапазони, тук този урок ще представи метода за решаване на тази задача.
Подредена лентова диаграма с условно форматиране в Excel
Този урок представя как да създадете подредена лентова диаграма с условно форматиране, както е показано на екранната снимка по-долу стъпка по стъпка в Excel.
Условно форматиране на редове или клетки, ако две колони са равни в Excel
В тази статия представям метода за условно форматиране на редове или клетки, ако две колони са еднакви в Excel.
Приложете условно форматиране за всеки ред в Excel
Понякога може да искате да приложите условното форматиране за всеки ред. Освен многократното задаване на едни и същи правила за всеки ред, има някои трикове за решаване на тази задача.
Най-добрите инструменти за производителност в офиса
Kutools за Excel решава повечето от вашите проблеми и увеличава вашата производителност с 80%
- Супер Формула Бар (лесно редактиране на няколко реда текст и формула); Оформление за четене (лесно четене и редактиране на голям брой клетки); Поставяне във филтриран диапазон...
- Обединяване на клетки/редове/колони и съхраняване на данни; Съдържание на разделени клетки; Комбинирайте дублиращи се редове и сума/средно... Предотвратяване на дублиращи се клетки; Сравнете диапазони...
- Изберете Дублиран или Уникален редове; Изберете Празни редове (всички клетки са празни); Super Find и Fuzzy Find в много работни тетрадки; Произволен избор...
- Точно копие Множество клетки без промяна на референтната формула; Автоматично създаване на препратки към множество листа; Вмъкване на куршуми, квадратчета за отметка и други...
- Любими и бързо вмъкнати формули, диапазони, диаграми и снимки; Шифроване на клетки с парола; Създаване на пощенски списък и изпращайте имейли...
- Извличане на текст, Добавяне на текст, Премахване по позиция, Премахване на пространството; Създаване и отпечатване на междинни суми за пейджинг; Конвертиране на съдържание и коментари между клетки...
- Супер филтър (запазване и прилагане на филтърни схеми към други листове); Разширено сортиране по месец/седмица/ден, честота и други; Специален филтър с удебелен шрифт, курсив...
- Комбинирайте работни тетрадки и работни листове; Обединяване на таблици въз основа на ключови колони; Разделете данните на няколко листа; Пакетно конвертиране на xls, xlsx и PDF...
- Групиране на обобщена таблица по номер на седмицата, ден от седмицата и други... Показване на отключени, заключени клетки с различни цветове; Маркирайте клетки, които имат формула/име...
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!