Note: The other languages of the website are Google-translated. Back to English

Шукайте та виділяйте результати пошуку в 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 підвищує вашу ефективність у роботі Microsoft Office на 50%

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

У порівнянні з відомими браузерами інструмент з вкладками на вкладці Office є потужнішим та ефективнішим.

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

Якщо ви зазвичай працюєте з кількома документами, вкладка 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% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Коментарі (5)
Поки немає оцінок. Оцініть першим!
Цей коментар був мінімізований модератором на сайті
Привіт, дякуємо за допомогу, але коли ми натискаємо ОК, щоб скасувати виділення. зміна кольору клітини. Я хочу оригінальний колір після скасування. Який код мені потрібно змінити в VBA.
Цей коментар був мінімізований модератором на сайті
Як ви можете змінити це, щоб також перейти до клітинки, яка підсвічується.
Цей коментар був мінімізований модератором на сайті
Привіт, Джеффе, якщо ви хочете виділити всі виділені клітинки, просто додайте
xRg.Select
в кінці наведеного вище коду дивіться знімок екрана:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-1.png
Якщо ви хочете перейти до першої виділеної клітинки, додайте
xRg.Areas(xRg.Areas.Count)(1).Select
в кінці наведеного вище коду дивіться знімок екрана:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-2.png
Цей коментар був мінімізований модератором на сайті
Чи працює це для Excel 2013 і що мені потрібно змінити, щоб відповідати версії 2003? Я спробував ваш код, але немає кнопки збереження модуля
Цей коментар був мінімізований модератором на сайті
Вибачте, це Excel 2003
There are no comments posted here yet
Залишайте свої коментарі
Публікація як гість
×
Оцініть цю публікацію:
0   Персонажі
Рекомендовані місця

Слідуй за нами

Copyright © 2009 - WWW.extendoffice.com. | Всі права захищені. На основі ExtendOffice. | Карта сайту
Microsoft та логотип Office є товарними знаками або зареєстрованими товарними знаками Microsoft Corporation у США та / або інших країнах.
Захищений Sectigo SSL