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

Шукайте та виділяйте результати пошуку в Excel

В Excel ви можете використовувати функцію Знайти та замінити, щоб знайти конкретне значення, але чи знаєте ви, як виділити результати пошуку після пошуку? У цій статті я представляю два різні способи, які допоможуть вам одночасно шукати та виділяти результати пошуку в Excel.

Шукайте та виділяйте результати пошуку за кодом VBA

Шукайте та виділяйте результати пошуку за допомогою умовного форматування

Пошук і виділення результатів пошуку за допомогою зручного інструменту


Шукайте та виділяйте результати пошуку за кодом VBA

В Excel існує код VBA, який може допомогти вам знайти значення, а потім виділити результати пошуку.

1. Увімкніть аркуш, який потрібно шукати, та виділіть результати, натисніть Alt + F11 клавіші, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. клацання Insert > Модуліта вставте нижче код до нового модуля.

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

doc search виділити результат пошуку 1

3. прес F5 клавіша, тоді вікно пошуку з’явиться, щоб ви ввели вказане значення, яке шукаєте.
doc search виділити результат пошуку 2

4. клацання OK, відповідні результати були виділені кольором тла. Також з’явиться діалогове вікно із запитом скасувати виділення. Клацніть OK щоб скасувати виділення та закрити діалогове вікно, натисніть Скасувати щоб зберегти виділення та закрити діалогове вікно.
doc search виділити результат пошуку 3

примітки:

1. Якщо відповідного значення не знайдено, з’явиться діалогове вікно, щоб нагадати вам.
doc search виділити результат пошуку 4

2. Цей VBA працює для всього активного аркуша та не враховує регістр.

от рухатися

Хочете отримати підвищення зарплати та багато часу, щоб супроводжувати сім’ю?

Вкладка Office підвищує вашу ефективність на 50% у Microsoft Office, що працює прямо зараз

Неймовірно, працювати з двома або більше документами простіше і швидше, ніж працювати з одним.

Порівняно з відомими браузерами, інструмент із вкладками в Office Tab потужніший і ефективніший.

Зменште сотні клацань миші та набору тексту за допомогою клавіатури щодня, прощайтеся з рукою миші.

Якщо ви зазвичай працюєте з кількома документами, вкладка Office допоможе вам заощадити час.

30-денна безкоштовна пробна версія, кредитна картка не потрібна.

ДетальнішеБезкоштовно завантажити зараз


Шукайте та виділяйте результати пошуку за допомогою умовного форматування

В Excel функція умовного форматування також може автоматично виділяти результати пошуку.

Припустимо, що дані та вікно пошуку відображаються, як показано на знімку екрана, тепер виконайте наступні дії:
doc search виділити результат пошуку 5

1. Виберіть діапазон, у якому ви хочете здійснити пошук, і натисніть Головна > Умовне форматування > Нове правило.
doc search виділити результат пошуку 6

2 В Нове правило форматування діалог, виберіть За допомогою формули визначте, які клітинки потрібно форматувати в Виберіть тип правила розділ, а потім перейдіть до текстового поля під Форматувати значення, де ця формула відповідає дійсності, введіть = І ($ E $ 2 <> "", $ E $ 2 = A4).

E2 - це комірка, в яку ви введете значення пошуку, а A4 - перша комірка в діапазоні, де ви шукаєте.
doc search виділити результат пошуку 7

3. клацання сформований , перейдіть до Формат ячеек діалогове вікно, під Заповнювати вкладку, виберіть один колір, як вам потрібно. Клацніть OK > OK щоб закрити діалоги.
doc search виділити результат пошуку 8

Відтепер, коли ви вводите ключове слово у комірку E2, результати пошуку будуть автоматично виділятися у зазначеному діапазоні.


Пошук і виділення результатів пошуку за допомогою зручного інструменту

Якщо ви хочете шукати два або більше значень і виділити результати пошуку один раз, Позначити ключове слово особливість Kutools для Excel міг би зробити вам послугу.

Kutools для Excel — це потужна надбудова, яка містить понад 300 зручних інструментів для підвищення ефективності роботи в Excel. Натисніть, щоб отримати 30-денну безкоштовну пробну версію зараз.

1. Виберіть діапазон даних, який потрібно шукати, і натисніть Кутулс > текст > Позначити ключове слово.
doc search виділити результат пошуку 8

2. У спливаючому діалоговому вікні введіть значення, які потрібно шукати, і розділивши їх комами ключове слово текстове вікно. Потім виберіть Позначте параметри і колір шрифту, як вам потрібно. Натисніть Ok.

Якщо ви хочете шукати значення з урахуванням регістру, поставте галочку Match Case прапорець.
doc search виділити результат пошуку 8

Тоді відповідні результати будуть виділені іншим кольором шрифту.
doc search виділити результат пошуку 8

З Позначити ключове слово Ви також можете знайти частину рядка в діапазоні. Припустимо, що клітинки пошуку містять м'яч або стрибок, введіть м'яч, стрибніть у ключове слово текстове поле, потім вкажіть налаштування та клацніть Ok.
doc search виділити результат пошуку 8doc search виділити результат пошуку 8


Зразок файлу

Клацніть, щоб завантажити зразок файлу


Інші операції (статті), пов’язані з кондиціонуванням

Підрахувати / підсумувати клітинки за кольорами за умовного форматування в Excel
Тепер цей підручник розповість вам кілька зручних та простих методів швидкого підрахунку або підсумовування комірок за кольором за допомогою умовного форматування в Excel.

Створіть діаграму з умовним форматуванням в Excel
Наприклад, у вас є таблиця оцінок класу, і ви хочете створити діаграму для кольорових оцінок у різних діапазонах, тут цей посібник представить метод вирішення цієї роботи.

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

Умовне форматування рядків або комірок, якщо два стовпці рівні в Excel
У цій статті я представляю метод умовного форматування рядків або комірок, якщо два стовпці рівні в Excel.

Застосуйте умовне форматування до кожного рядка в Excel
Іноді вам може знадобитися застосувати умовне форматування для кожного рядка. Окрім неодноразового встановлення однакових правил для кожного рядка, є кілька хитрощів щодо вирішення цієї роботи.


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

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

  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці та Ведення даних; Вміст розділених комірок; Поєднуйте повторювані рядки та суму / середнє... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Улюблені та швидко вставлені формули, Діапазони, діаграми та зображення; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Групування зведеної таблиці за номер тижня, день тижня та багато іншого ... Показати розблоковані, заблоковані клітини за різними кольорами; Виділіть клітини, які мають формулу / назву...
вкладка kte 201905
  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Comments (10)
Rated 4.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
how do I make a VBA to search a few times with different highlight color?

and

then how do i make the highlight area, not only in the exact cell but also the cells next to it, or the whole row?

Please advice.

Thank you.
Rated 4.5 out of 5
This comment was minimized by the moderator on the site
how about highlight the keyword's row or column or the 3 cells next to the keyword?

and how do i search multiple times with different color of highlight?
This comment was minimized by the moderator on the site
How would I make the data entry box reopen after hitting ok? I use this macro with a barcode scanner and would like to be able to keep scanning without having to rerun macro each time. Example open macro scan it finds and highlights then reopens for next scan.
This comment was minimized by the moderator on the site
Hi, I have office 365 but when I went to Kutools > Text > I could not find Mark Keyword. Is there feature still there? Thanks
This comment was minimized by the moderator on the site
Hi, Kimber, what version of Kutools for Excel you use? Mark Keyword released after Kutools for Excel 24.0. If your version is lower than 24.0, please upgrade your version.
This comment was minimized by the moderator on the site
Does it work for Excel 2013 and what do I have to change in order to fit in with the 2003 version? I’ve tried your code but there is no button to save the module
This comment was minimized by the moderator on the site
Sorry, it’s Excel 2003
This comment was minimized by the moderator on the site
How can you modify this to also jump to the cell that is being highlighted.
This comment was minimized by the moderator on the site
Hi, Jeff, if you want to select all highlighted cells, just add
xRg.Select
at the end of the above code, see screenshot:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-1.png
If you want to jump to the first highlighted cell, add
xRg.Areas(xRg.Areas.Count)(1).Select
at the end of the above code, see screenshot:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-2.png
This comment was minimized by the moderator on the site
Hi thanks for your help but when we click ok for cancel highlighting. color of cell change. I want orignal color after cancel. What code i need to change in VBA.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations