Найти все строки содержащие слово excel

Далее протягиваем формулу до конца таблицы и подключаем сводную.

Теперь мы можем работать и сводить данные только по документам реализации исключая возвраты . При дополнении таблицы новыми данными, остается только протягивать строку с нашим выражением и обновлять сводную таблицу.

Если материал Вам понравился или даже пригодился, Вы можете поблагодарить автора, переведя определенную сумму по кнопке ниже:
(для перевода по карте нажмите на VISA и далее «перевести»)

Проверка ячейки на наличие текста (без учета регистра)

Примечание: Мы стараемся как можно оперативнее обеспечивать вас актуальными справочными материалами на вашем языке. Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Просим вас уделить пару секунд и сообщить, помогла ли она вам, с помощью кнопок внизу страницы. Для удобства также приводим ссылку на оригинал (на английском языке).

Допустим, вы хотите убедиться, что столбец имеет текст, а не числа. Или перхапсйоу нужно найти все заказы, соответствующие определенному продавцу. Если вы не хотите учитывать текст верхнего или нижнего регистра, есть несколько способов проверить, содержит ли ячейка.

Вы также можете использовать фильтр для поиска текста. Дополнительные сведения можно найти в разделе Фильтрация данных.

Поиск ячеек, содержащих текст

Чтобы найти ячейки, содержащие определенный текст, выполните указанные ниже действия.

Выделите диапазон ячеек, которые вы хотите найти.

Чтобы выполнить поиск на всем листе, щелкните любую ячейку.

На вкладке Главная в группе Редактирование нажмите кнопку найти _амп_и выберите пункт найти.

В поле найти введите текст (или числа), который нужно найти. Вы также можете выбрать последний поисковый запрос из раскрывающегося списка найти .

Примечание: В критериях поиска можно использовать подстановочные знаки.

Чтобы задать формат поиска, нажмите кнопку Формат и выберите нужные параметры в всплывающем окне Найти формат .

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

В поле внутри вы можете выбрать лист или книгу , чтобы выполнить поиск на листе или во всей книге.

Нажмите кнопку найти все или Найти далее.

Найдите все списки всех вхождений элемента, который нужно найти, и вы можете сделать ячейку активной, выбрав определенное вхождение. Вы можете отсортировать результаты поиска » найти все «, щелкнув заголовок.

Примечание: Чтобы остановить поиск, нажмите клавишу ESC.

Проверка ячейки на наличие в ней текста

Для выполнения этой задачи используйте функцию текст .

Проверка соответствия ячейки определенному тексту

Используйте функцию Если , чтобы вернуть результаты для указанного условия.

Проверка соответствия части ячейки определенному тексту

Для выполнения этой задачи используйте функции Если, Поиски функция номер .

Примечание: Функция Поиск не учитывает регистр.

Как в excel строки, содержащие текст «N», сделать последовательно?

Есть документ excel. Там много строк. В некоторых строках, в определённой ячейке совпадает слово, скажем — «TheWord», но данные строки разрознены по всей таблице. Как эти строки сделать в последовательности?

Например есть 10 строк со словом «Table» в ячейке, а есть 10 слов со словом «Street», причем в одной ячейке два этих слова встречаться не могут. Так вот, эти строки расположены чередой (сначала строка со словом Table, затем со словом Street, затем снова Table и т.д.). Нужно чтобы сначала шли 10 строк со словом Table, а затем 10 строк со словом Street.

• Вопрос задан более трёх лет назад
• 2718 просмотров

Реализация может быть различной.
Зависит, в частности, от того, сколько в таблице столбцов, в которых нужно искать слово — один или более; сколько искомых слов (например, если их много, то IF использовать будет неудобно, а то и невозможно). Предположим, что столбец один, и это столбец А, а искомых слов — два, Table и Street.

Создайте дополнительный столбец B с формулой, например,

Протяните ее вниз параллельно исходным данным. Тогда в столбец B будут выбраны ключевые слова TableStreet для каждой строки, и other, если строка не содержит ни одного ключевого значения.
Теперь можно выделить столбцы A и B, и отсортировать по значениям столбца B.

Если ключевых слов больше, то ввиду ограничения числа вложенности функции IF такой подход не пойдет. Тогда лучше использовать вариант с функцией CHOOSE:

Работает так же — протягиваете, сортируете по второму столбцу.

Каждое новое ключевое слово добавляете к первому аргументу CHOOSE как элемент
+ISNUMBER(SEARCH(«keyword_n+1»;A1))*[index+1]
где keyword_n+1 — иcкомое ключевое слово, а [index+1] — следующий по порядку индекс. В итоге первый аргумент CHOOSE сводится к числовому значению, равному индексу искомого элемента*. В конце формулы идет перечень значений, выдаваемых по этому индексу. Новое ключевое слово как текстовую строку добавляете туда в конец.

Внимание, в отличие от первого способа, при отсутствии в тексте строки ключевых слов выдает ошибку «#VALUE!» (вместо «other», как в предыдущем примере).

* Корректно работает при условии, что в строке не могут встречаться более одного ключевого слова одновременно. Если у вас будет строка, где есть и Street, и Table, получится фигня. Это же касается и предыдущего способа.

Текстовые функции Excel

ФИО, номера банковских карт, адреса клиентов или сотрудников, комментарии и многое другое –все это является строками, с которыми многие сталкиваются, работая с приложением Excel. Поэтому полезно уметь обрабатывать информацию подобного типа. В данной статье будут рассмотрены текстовые функции в Excel, но не все, а те, которые, по мнению office-menu.ru, самые полезные и интересные:

Список всех текстовых функций Вы можете найти на вкладке «Формулы» => выпадающий список «Текстовые»:

Функция ЛЕВСИМВ

Возвращает подстроку из текста в порядке слева направо в заданном количестве символов.

Синтаксис: =ЛЕВСИМВ(текст; [количество_знаков])

• текст – строка либо ссылка на ячейку, содержащую текст, из которого необходимо вернуть подстроку;
• количество_знаков – необязательный аргумент. Целое число, указывающее, какое количество символов необходимо вернуть из текста. По умолчанию принимает значение 1.

Пример использования:

Формула: =ЛЕВСИМВ(«Произвольный текст»;8) – возвращенное значение «Произвол».

Функция ПРАВСИМВ

Данная функция аналогична функции «ЛЕВСИМВ», за исключением того, что знаки возвращаются с конца строки.

Пример использования:

Формула: =ПРАВСИМВ(«произвольный текст»;5) – возвращенное значение «текст».

Функция ДЛСТР

С ее помощью определяется длина строки. В качестве результата возвращается целое число, указывающее количество символов текста.

Синтаксис: =ДЛСТР(текст)

Пример использования:

Функция НАЙТИ

Возвращает число, являющееся вхождением первого символа подстроки, искомого текста. Если текст не найден, то возвращается ошибка «#ЗНАЧ!».

Синтаксис: =НАЙТИ(искомый_текст; текст_для_поиска; [нач_позиция])

• искомый_текст – строка, которую необходимо найти;
• текст_для_поиска – текст, в котором осуществляется поиск первого аргумента;
• нач_позиция – необязательный элемент. Принимает целое число, которое указывает, с какого символа текст_для_поиска необходимо начинать просмотр. По умолчанию принимает значение 1.

Пример использования:

Из отрывка стихотворения великого поэта С.А.Есенина находим вхождение первого символа строки «птица». Поиск осуществляется с начала строки. Если в приведенном примере поиск осуществлялся бы с 40 символа, то функция в результате вернула ошибку, т.к. позиции вхождения не было найдено.

Функция ЗАМЕНИТЬ

Данная функция заменяет часть строки в заданном количестве символов, начиная с указанного по счету символа на новый текст.

Синтаксис: ЗАМЕНИТЬ(старый_текст; начальная_позиция; количество_знаков; новый_текст)

• старый_текст – строка либо ссылка на ячейку, содержащую текст;
• начальная_позиция – порядковый номер символа слева направо, с которого нужно производить замену;
• количество_знаков – количество символов, начиная с начальная_позиция включительно, которые необходимо заменить новым текстом;
• новый_текст – строка, которая подменяет часть старого текста, заданного аргументами начальная_позиция и количество_знаков.

Пример использования:

Здесь в строке, содержащейся в ячейке A1, подменяется слово «старый», которое начинается с 19-го символа и имеет длину 6 символов, на слово «новый».

В случае обработки небольшого количества ячеек такой способ вполне приемлем. Но если обработать необходимо несколько тысяч различных строк, то процесс составления формул станет трудоемким. Поэтому переделаем рассмотренный пример, используя знания по тем функциям, которые уже описаны в начале статьи, а именно:

• Аргумент «начальная_позиция» подменим функцией «НАЙТИ»;
• В место аргумент «количество_знаков» вложим функцию «ДЛСТР».

В результате получим формулу: =ЗАМЕНИТЬ(A1;НАЙТИ(«старый»;A1);ДЛСТР(«старый»);»новый»)

Посмотрите на принтскрин окна функции. Возвращаемые результаты аргументов не поменялись, зато теперь их можно определять динамически, составив формулу один раз.

Функция ПОДСТАВИТЬ

Данная функция заменяет в тексте вхождения указанной подстроки на новый текст, чем схожа с функцией «ЗАМЕНИТЬ», но между ними имеется принципиальное отличие. Если функция «ЗАМЕНИТЬ» меняет текст, указанный посимвольно вручную, то функция «ПОДСТАВИТЬ» автоматически находит вхождения указанной строки и меняет их.

Синтаксис: ПОДСТАВИТЬ(текст; старый_текст; новый_текст; [номер_вхождения])

• текст – строка или ссылка на ячейку, содержащую текст;
• старый_текст – подстрока из первого аргумента, которую необходимо заменить;
• новый_текст – строка для подмены старого текста;
• номер_вхождения – необязательный аргумент. Принимает целое число, указывающее порядковый номер вхождения старый_текст, которое подлежит замене, все остальные вхождения затронуты не будут. Если оставить аргумент пустым, то будут заменены все вхождения.

Пример использования:

Строка в ячейке A1 содержит текст, в котором имеются 2 подстроки «старый». Нам необходимо подставить на место первого вхождения строку «новый». В результате часть текста «…старый-старый…», заменяется на «…новый-старый…».

Если ли бы последний аргумент был опущен, то результатом бы стала строка «строка, содержащая новый-новый текст».

Функция ПСТР

ПСТР возвращает из указанной строки часть текста в заданном количестве символов, начиная с указанного символа.

Синтаксис: ПСТР(текст; начальная_позиция; количество_знаков)

• текст – строка или ссылка на ячейку, содержащую текст;
• начальная_позиция – порядковый номер символа, начиная с которого необходимо вернуть строку;
• количество_знаков – натуральное целое число, указывающее количество символов, которое необходимо вернуть, начиная с позиции начальная_позиция.

Пример использования:

Из текста, находящегося в ячейке A1 необходимо вернуть последние 2 слова, которые имеют общую длину 12 символов. Первый символ возвращаемой фразы имеет порядковый номер 12.

Аргумент количество_знаков может превышать допустимо возможную длину возвращаемых символов. Т.е. если в рассмотренном примере вместо количество_знаков = 12, было бы указано значение 15, то результат не изменился, и функция так же вернула строку «функции ПСТР».

Для удобства использования данной функции ее аргументы можно подменить функциями «НАЙТИ» и «ДЛСТР», как это было сделано в примере с функцией «ЗАМЕНИТЬ».

Функция СЖПРОБЕЛЫ

Данная функция удаляется все лишние пробелы: пробелы по краям и двойные пробелы между словами. После обработки строк функцией остаются только одиночные пробелы между словами.

Синтаксис: =СЖПРОБЕЛЫ(текст)

Пример использования:

=СЖПРОБЕЛЫ( » Текст с лишними пробелами между словами и по краям « )

Результатом выполнения функции будет строка: «Текст с лишними пробелами между словами и по краям» .

Функция СЦЕПИТЬ

С помощью функции «СЦЕПИТЬ» можно объединить несколько строк между собой. Максимальное количество строк для объединения – 255.

Синтаксис: =СЦЕПИТЬ(текст1; [текст2]; …)

Функция должна содержать не менее одного аргумента

Пример использования:

Функция возвратит строку: «Слово1 Слово2».

Не забывайте, что функция самостоятельно не добавляет пробелы между строками, поэтому добавлять их приходится самостоятельно.

Вместо использования данной функции можно применять знак амперсанда «&». Он так же объединяет строки. Например: «=»Слово1″&» «&«Слово2″».

Есть ли слово в списке MS EXCEL

Найдем слово в диапазоне ячеек, удовлетворяющее критерию: точное совпадение с критерием, совпадение с учетом регистра, совпадение лишь части символов из слова и т.д.

Пусть Список значений, в котором производится поиск содержит только отдельные слова (см. столбец А на рисунке ниже).

Совет: О поиске слова в списках, состоящих из текстовых строк (т.е. в ячейке содержится не одно слово, а несколько, разделенных пробелами) можно прочитать в статье Выделение ячеек c ТЕКСТом с применением Условного форматирования в MS EXCEL.

Задачу поиска текстового значения в диапазоне ячеек можно разбить на несколько типов:

• ищутся значения в точности совпадающие с критерием;
• ищутся значения содержащие критерий;
• ищутся значения с учетом РЕгиСТра.

Ищутся значения в точности соответствующие критерию

Это простейший случай. Здесь можно использовать формулу наподобие нижеуказанной
=СЧЁТЕСЛИ($A$5:$A$11;»яблоки»)

Формула возвращает количество найденных значений, соответствующих критерию (см. файл примера ).

Ищутся значения содержащие часть текстовой строки

Типичный вопрос для этого типа поиска: Есть ли в Списке слово со слогом МА?

Для ответа на вопросы такого типа требуется задать в качестве критерия часть текстового значения. Например, для отбора всех ячеек, содержащих все склонения слова яблоко (яблоку, яблоком, яблока и пр.) можно использовать критерии с подстановочным знаком * (звездочка). Для этого нужно использовать конструкцию *яблок*.

Типичная формула =СЧЁТЕСЛИ($A$5:$A$11;»*МА*»)

Ищутся значения с учетом РЕгиСТрА

Учет регистра приводит к необходимости создания сложных формул или использования дополнительных столбцов. Чаще всего используются формулы на основе функций учитывающих регистр НАЙТИ() , СОВПАД() .

Формула массива =ИЛИ(СОВПАД(«яблоки»;A5:A11)) дает ответ на вопрос есть ли такой элемент в списке.

СОВЕТ:
Идеи о поиске также можно посмотреть в статье Поиск текстовых значений в списках. Часть1. Обычный поиск.

Похожие статьи

В этой статье описаны синтаксис формулы и использование функций ПОИСК и ПОИСКБ в Microsoft Excel.

Описание

Функции ПОИСК И ПОИСКБ находят одну текстовую строку в другой и возвращают начальную позицию первой текстовой строки (считая от первого символа второй текстовой строки). Например, чтобы найти позицию буквы «n» в слове «printer», можно использовать следующую функцию:

=ПОИСК(«н»;»принтер»)

Эта функция возвращает 4, так как «н» является четвертым символом в слове «принтер».

Можно также находить слова в других словах. Например, функция

=ПОИСК(«base»;»database»)

возвращает 5, так как слово «base» начинается с пятого символа слова «database». Можно использовать функции ПОИСК и ПОИСКБ для определения положения символа или текстовой строки в другой текстовой строке, а затем вернуть текст с помощью функций ПСТР и ПСТРБ или заменить его с помощью функций ЗАМЕНИТЬ и ЗАМЕНИТЬБ. Эти функции показаны в примере 1 данной статьи.

Важно: 

• Эти функции могут быть доступны не на всех языках.

• Функция ПОИСКБ отсчитывает по два байта на каждый символ, только если языком по умолчанию является язык с поддержкой БДЦС. В противном случае функция ПОИСКБ работает так же, как функция ПОИСК, и отсчитывает по одному байту на каждый символ.

К языкам, поддерживающим БДЦС, относятся японский, китайский (упрощенное письмо), китайский (традиционное письмо) и корейский.

Синтаксис

ПОИСК(искомый_текст;просматриваемый_текст;[начальная_позиция])

ПОИСКБ(искомый_текст;просматриваемый_текст;[начальная_позиция])

Аргументы функций ПОИСК и ПОИСКБ описаны ниже.

• Искомый_текст    Обязательный. Текст, который требуется найти.

• Просматриваемый_текст    Обязательный. Текст, в котором нужно найти значение аргумента искомый_текст.

• Начальная_позиция    Необязательный. Номер знака в аргументе просматриваемый_текст, с которого следует начать поиск.

Замечание

• Функции ПОИСК и ПОИСКБ не учитывают регистр. Если требуется учитывать регистр, используйте функции НАЙТИ и НАЙТИБ.

• В аргументе искомый_текст можно использовать подстановочные знаки: вопросительный знак (?) и звездочку (*). Вопросительный знак соответствует любому знаку, звездочка — любой последовательности знаков. Если требуется найти вопросительный знак или звездочку, введите перед ним тильду (~).

• Если значение find_text не найдено, #VALUE! возвращается значение ошибки.

• Если аргумент начальная_позиция опущен, то он полагается равным 1.

• Если start_num больше нуля или больше, чем длина аргумента within_text, #VALUE! возвращается значение ошибки.

• Аргумент начальная_позиция можно использовать, чтобы пропустить определенное количество знаков. Допустим, что функцию ПОИСК нужно использовать для работы с текстовой строкой «МДС0093.МужскаяОдежда». Чтобы найти первое вхождение «М» в описательной части текстовой строки, задайте для аргумента начальная_позиция значение 8, чтобы поиск не выполнялся в той части текста, которая является серийным номером (в данном случае — «МДС0093»). Функция ПОИСК начинает поиск с восьмого символа, находит знак, указанный в аргументе искомый_текст, в следующей позиции, и возвращает число 9. Функция ПОИСК всегда возвращает номер знака, считая от начала просматриваемого текста, включая символы, которые пропускаются, если значение аргумента начальная_позиция больше 1.

Примеры

Скопируйте образец данных из следующей таблицы и вставьте их в ячейку A1 нового листа Excel. Чтобы отобразить результаты формул, выделите их и нажмите клавишу F2, а затем — клавишу ВВОД. При необходимости измените ширину столбцов, чтобы видеть все данные.

Данные
Выписки
Доход: маржа
маржа
Здесь «босс».
Формула	Описание	Результат
=ПОИСК(«и»;A2;6)	Позиция первого знака «и» в строке ячейки A2, начиная с шестого знака.	7
=ПОИСК(A4;A3)	Начальная позиция строки «маржа» (искомая строка в ячейке A4) в строке «Доход: маржа» (ячейка, в которой выполняется поиск — A3).	8
=ЗАМЕНИТЬ(A3;ПОИСК(A4;A3);6;»объем»)	Заменяет слово «маржа» словом «объем», определяя позицию слова «маржа» в ячейке A3 и заменяя этот знак и последующие пять знаков текстовой строкой «объем.»	Доход: объем
=ПСТР(A3;ПОИСК(» «;A3)+1,4)	Возвращает первые четыре знака, которые следуют за первым пробелом в строке «Доход: маржа» (ячейка A3).	марж
=ПОИСК(«»»»;A5)	Позиция первой двойной кавычки («) в ячейке A5.	5
=ПСТР(A5;ПОИСК(«»»»;A5)+1;ПОИСК(«»»»;A5;ПОИСК(«»»»;A5)+1)-ПОИСК(«»»»;A5)-1)	Возвращает из ячейки A5 только текст, заключенный в двойные кавычки.	босс

Найдем текстовые значения, удовлетворяющие заданному пользователем критерию. Поиск будем осуществлять в диапазоне с повторяющимися значениями. При наличии повторов, можно ожидать, что критерию будет соответствовать несколько значений. Для их вывода в отдельный диапазон удобно использовать формулы массива.

Пусть Исходный список значений (например, перечень инструментов) находится в диапазоне

A10:A19

(см.

Файл примера

).

Задача

Выведем в отдельный диапазон значения, которые удовлетворяют критерию. Рассмотрим различные варианты поиска.

А. Найти значения, которые содержат критерий

Для удобства создадим

именованный диапазон

Список

.

Диапазон может охватить в том числе и незаполненные ячейки перечня. В дальнейшем пользователь может расширить перечень инструментов, указанные ниже формулы автоматически учтут новые значения.

Выведем в отдельный диапазон все значения Исходного списка, в которых

содержится

текст-критерий (например, слово

дрель

). Критерий вводится в ячейку

С6

.

Для создания списка, содержащего найденные значения, воспользуемся

формулой массива

:

=ИНДЕКС(Список; НАИМЕНЬШИЙ( ЕСЛИ(ЕСЛИОШИБКА(ПОИСК($C$6;Список);0)>0;СТРОКА(Список)-СТРОКА($A$9);30); СТРОКА(ДВССЫЛ(«A1:A»&ЧСТРОК(Список)))))

Алгоритм работы формулы следующий (для просмотра промежуточных шагов работы формулы воспользуйтесь

клавишей

F9

):

• Функция
  
  ПОИСК()
  
  , перебирая элементы исходного списка, определяет, содержится ли в нем значение-критерий. Если значение не содержится, то возвращается ошибка #ЗНАЧ! В противном случае возвращается числовое значение, соответствующее номеру начальной позиции вхождения критерия в значение из списка (здесь нам не важен номер позиции, важно, что это число);
• Функция
  
  ЕСЛИОШИБКА()
  
  используется для подавления ошибки #ЗНАЧ! заменяя ее на число 0;
• Функция
  
  ЕСЛИ()
  
  заменяет числовые значения, возвращенные функцией
  
  ПОИСК()
  
  , на номер позиции значения в списке. Если значение =0 (соответствует ошибке #ЗНАЧ!), то возвращается число 30. В принципе, вместо 30 можно указать любое число, которое больше номера последней заполненной позиции Исходного списка (это нужно для правильной сортировки функцией
  
  НАИМЕНЬШИЙ()
  
  );
• Функция
  
  НАИМЕНЬШИЙ()
  
  сортирует массив номеров строк по возрастанию;
• Функция
  
  ДВССЫЛ()
  
  возвращает

  массив последовательных чисел

  ;

• Функция
  
  ИНДЕКС()
  
  возвращает текстовые значения из Исходного списка, из строк, номера которых были получены на предыдущем шаге.

В предельном случае м.б. найдено столько же значений, сколько содержится в исходном списке (когда все значения удовлетворяют критерию). Поэтому

формулу массива

нужно распространять на диапазон той же размерности, что и исходный список. Вышеуказанная

формула массива будет возвращать несколько значений

, поэтому перед вводом формулы нужно выделить сразу весь диапазон, т.е. ячейки

С10:С19

, ввести формулу в

Строке формул

и нажать

CRTL+SHIFT+ENTER

.

Для скрытия ошибок #ССЫЛКА!, возвращаемой формулой массива, к диапазону

С10:С19

применено правило

Условного форматирования

.

Б. Найти значения, которые совпадают с критерием (точное совпадение)

В этом случае будут выведены все значения, которые совпадают с критерием (без

учета РЕгиСТра

). Критерий вводится в ячейку

E

6

.

Для создания списка, содержащего найденные значения, воспользуемся

формулой массива

:

=ИНДЕКС(Список; НАИМЕНЬШИЙ( ЕСЛИ($E$6=Список;СТРОКА(Список)-СТРОКА($A$9);30); СТРОКА(ДВССЫЛ(«A1:A»&ЧСТРОК(Список)))))

B. Найти значения, которые начинаются с критерия

В этом случае будут выведены все значения, которые начинаются или совпадают с критерием. Критерий вводится в ячейку

G

6

.

Для создания списка, содержащего найденные значения, воспользуемся

формулой массива

: =

ИНДЕКС(Список;НАИМЕНЬШИЙ( ЕСЛИ(ЕСЛИОШИБКА(ПОИСК($G$6;Список);0)=1;СТРОКА(Список)-СТРОКА($A$9);30); СТРОКА(ДВССЫЛ(«A1:A»&ЧСТРОК(Список)))))

Г. Найти значения, которые заканчиваются на критерий

В этом случае будут выведены все значения, которые заканчиваются или совпадают с критерием. Критерий вводится в ячейку

I

6

.

Для создания списка, содержащего найденные значения, воспользуемся

формулой массива

:

=ИНДЕКС(Список;НАИМЕНЬШИЙ( ЕСЛИ($I$6=ПРАВСИМВ(Список;ДЛСТР($I$6));СТРОКА(Список)-СТРОКА($A$9);30); СТРОКА(ДВССЫЛ(«A1:A»&ЧСТРОК(Список)))))

СОВЕТ:

О поиске текстовых значений с использованием

подстановочных знаков

читайте в статье

Поиск текстовых значений в списках. Часть2. Подстановочные знаки

. В статье

Выделение ячеек c ТЕКСТом с применением Условного форматирования

приведено решение аналогичной задачи с использованием

Условного форматирования

.

• Поиск по одному слову
  • Фильтрация по слову в Excel
  • Поиск по слову в ячейке: формула
  • Поиск по слову в Excel с помощью !SEMTools
• Поиск по нескольким словам
  • Найти любое слово из списка
  • Найти все слова из списка

Чем отличается поиск по словам от простого поиска текста?

В первую очередь тем, что, если искать короткие слова обычным вхождением, мы можем найти слова, находящиеся внутри других слов. В результат фильтрации попадут ячейки, которые нам не нужны.

Поиск по словам предполагает показывать только ячейки, в которых слова совпадают целиком.

Поиск по одному слову

Рассмотрим сначала простой случай — когда найти нужно одно слово.

Фильтрация по слову в Excel

Процедура фильтрации в Excel содержит 3 метода текстовой фильтрации, иными словами, фильтровать можно по 3 критериям вхождения слова:

1. ячейка содержит слово — тогда ставим пробелы перед и после слова;
2. начинается с него — пробел после;
3. заканчивается на него — пробел перед ним.

Проблема заключается в том, что в Excel нельзя фильтровать сразу по 3 критериям – можно только по двум. В этой ситуации есть простой лайфхак:

1. Сделать копию исходного столбца;
2. Удалить все символы, кроме текста и цифр (и пробелов между ними);
3. Добавить символы в конце и начале каждой ячейки столбца, например, символ “”;
4. Заменить оставшиеся пробелы на этот же символ;
5. После этого фильтровать по полученному столбцу уже наше слово с “” перед и после него (пример – “слово”).

Символ как раз и поможет отфильтровать целые слова.

Как вы заметили, шагов целых пять, поэтому, если вам нужно найти только одно слово один раз, лучше просто 3 раза отфильтровать. Но если нужно будет искать несколько слов, это существенно ускорит процесс.

Смотрите пример ниже:

Можно сделать иначе — добавить в начале и конце строк пробелы, но тогда при поиске и фильтрации слова перед пробелом слева и после пробела справа нужно использовать символ “*” (звездочку). Иначе Excel не учтет пробелы.

Итак, чтобы сделать поиск или фильтрацию по слову в Excel, нужно добавить символ пробела справа и слева ко всем ячейкам столбца и после этого осуществлять поиск и фильтрацию по слову вместе с пробелами перед и после него.

Поиск по слову в ячейке: формула

Идеальной функцией для формулы поиска слова будет функция ПОИСК.

Формула:

=ПОИСК(" "&"вашеСлово"&" ";" "&A1&" ")>0

где вашеСлово — искомое слово, а A1 — ячейка, в которой мы его ищем.

Однако нужно помнить, что пунктуацию нужно предварительно удалить.

Поиск по слову в Excel с помощью !SEMTools

Пожалуй, самое быстрое решение, доступное владельцам полной версии моей надстройки для Excel. Алгоритм простой — выделяем диапазон, жмем макрос, вводим слово, жмем «ОК».

Поиск по нескольким словам

Как выяснить для каждой ячейки большого диапазона, присутствует ли в ней хотя бы одно из списка слов? Да так, чтобы слово не просто содержалось внутри строки, в том числе внутри других слов, а находить именно целые слова? А если нужно найти пару сотен слов в десятках тысяч ячеек?

Найти любое слово из списка

Настройка !SEMTools с лёгкостью решает такого рода проблемы. Более того, практически вне зависимости от количества слов, распознавание их наличия происходит очень быстро даже в диапазоне из 10 000 ячеек и более.

Чтобы найти список слов диапазоне ячеек с помощью !SEMTools, нужно:

1. скопировать в соседний столбец диапазон, в котором мы хотим найти список слов. Это нужно для того, чтобы не стереть исходные данные,
2. вызвать макрос на панели настройки,
3. выбрать список слов, которые необходимо найти,
4. нажать OK.

Макрос даёт проверить, есть ли хотя бы одно слово из списка в ячейке.

Конкретные примеры использования

Данная процедура обычно полезна перед двумя другими — извлечь слова из списка и удалить из текста список слов. Почему не производить их сразу? Дело в том, что первый более медленный, а второй не даст понимания, какие ячейки затронула операция удаления.

Есть множество случаев применения данного макроса.
Специалисты по контекстной рекламе могут искать маркеры покупки, аренды, отзывы, многие хранят собственные длинные списки минус-слов, наличие которых в запросе означает, что его необходимо не включать в рекламную кампанию.

Если вас интересует, присутствуют ли в прайс-листе товары определенных производителей, список которых у вас уже имеется, или каковы остатки товара на складе по этим позициям, вам также может пригодиться данный макрос.

Найти все слова из списка

Данная процедура производит тот же поиск по словам, но с кардинальным отличием. Ключевое условие — чтобы ВСЕ слова содержались в ячейке, только тогда она возвращает ИСТИНА.

Нужно сделать поиск в Excel по словам?
!SEMTools поможет решить задачу за пару кликов!

Функция ПОИСК() в MS EXCEL

​Смотрите также​ словарь адресами ячеек,​ Split(CreateObject(«Scripting.FileSystemObject»).Getfile(ActiveWorkbook.Path & «ИД.txt»).OpenasTextStream(1).ReadAll,​ верно вернуть адрес​5. Почему сначала​ памяти без обновления​ ActiveWorkbook.Path & «1.​

Синтаксис функции

​zamboga​​ Код =ЕСЛИОШИБКА(ИНДЕКС(списки!B$1:B$6;ПОИСКПОЗ(ЛОЖЬ;ЕНД(ПОИСКПОЗ(«*»&списки!A$1:A$6&»*»;A2;));));»-«)​

​ готовый макрос. И​​ текст «11 казачок».​ а по сути​

​ будет соответствовать любому​​ нее станем искать​ нажмите клавишу ESC.​​ также использовать фильтр.​​ строке «мама мыла​

​Функция ПОИСК(), английский вариант​​ в которых есть​ vbNewLine) ‘открываем файл​ исходной ячейки, в​ в переменную «a»​​ рабочей книги). Вопрос,​​ Искать это.txt» Workbooks.OpenText​: На входе задается​

​Витушка​​ формулу такую длинную.​​ Т.е. Если ячейка​ и типам значений​ знаку.​ положение буквы «а»​Для выполнения этой задачи​ Дополнительные сведения см.​ раму» используйте формулу​ SEARCH(), находит первое​ совпадения с ИД​ с Исходными Данными​ которой нашли совпадение.​ присваивается массив данных​

​ как что поправить,​ Filename:=PathFileTxt, Origin:=1251 a​ список слов или​

​: Я понимаю, что​Но если порядок​ А2 содержи текст​ – одинаковые:​Звездочка (*). Этот символ​

Примеры

​ в слове «Александр»,​ используется функция​ в статье Фильтрация​ =ЕСЛИ(ДЛСТР(ПОДСТАВИТЬ(«мама мыла раму»;»м»;»»;3))=ДЛСТР(«мама​

​ вхождение одной текстовой​​ For i =​​ PathFileTxt = ActiveWorkbook.Path​Т.е. нужно массив​ для поиска, а​ чтобы скрипт верно​ = [a1].CurrentRegion.Value ActiveWorkbook.Close​ фраз (например, через​ я дурак. Мучаюсь​

​ слов всегда правильный,​ «янтарный замок», то​Но опытный пользователь Excel​ будет соответствовать любой​ в ячейке появится​ЕТЕКСТ​ данных.​

​ мыла раму»);»Нет третьего​ строки в другой​ 1 To UBound(a)​ & «ИД.txt» Workbooks.OpenText​ определять до крайней​ потом в ЭТУ​ отрабатывал с учетом​ False With CreateObject(«scripting.dictionary»)​ буфер обмена, или​ уже час. Но​ то конечно всё​ в ячейку В2​ знает, что отличие​ комбинации знаков.​ выражение 1, так​

​.​Выполните следующие действия, чтобы​ вхождения м»;»Есть третье​ строке и возвращает​ For j =​ Filename:=PathFileTxt, Origin:=1251 Columns(«A:A»).Select​ правой и крайней​ же переменную массив​

Функция НАЙТИ() vs ПОИСК()

​ пустых строк и​ For Each el​ на отдельном листе).​ мне не ввести​ проще.​ ввести текст «10​ у этих двух​Если же требуется найти​ как это первый​

Связь с функциями ЛЕВСИМВ(), ПРАВСИМВ() и ПСТР()

​Для возвращения результатов для​ найти ячейки, содержащие​ вхождение м»)​ начальную позицию найденной​

​ 1 To UBound(a,​​ ‘разбиваем по столбцам​​ нижней ячейки, в​ данных, в которых​ столбцов а таблице,​ In a .Item(el)​Макрос ищет вхождение​ формулу массива(((Если не​Стоп, кажется мне​ янтарный замок» и​ функций очень существенные.​ подобные символы в​ символ в анализируемой​

excel2.ru

Проверка ячейки на наличие в ней текста (без учета регистра)

​ условия, которое можно​​ определенный текст.​Формула =ПОИСК(«клад?»;»докладная») вернет 3,​ строки.​ 2) t =​ чтобы найти слова,​ которой есть какой-либо​ ищем? Т.е. одна​ в которой ищем?​ = «» Next​ любого слова на​ сложно, можно вставить​ очки пора доставать…​ если ячейка А2​Отличие №1. Чувствительность к​ строке, то в​ информации. При задании​ указать с помощью​Выделите диапазон ячеек, среди​ т.е. в слове​ПОИСКискомый_текстпросматриваемая_строка​ a(i, j) ‘​

​ а не фразы​ текст.​ и таже переменная​3. Скрипт ошибочно​ For Each sh​ ВСЕХ листах открытой​ ее в файл?​ Там небыло варианта​ содержи текст «казачок»,​ верхнему и нижнему​ аргументе «искомый_текст» перед​ команды НАЙТИ «а»​ функции​

​ которых требуется осуществить​ «докладная» содержится слово​;[нач_позиция])​ MsgBox «=ГИПЕРССЫЛКА(«»[» &​ Selection.TextToColumns Destination:=Range(«A1»), DataType:=xlDelimited,​

Поиск ячеек, содержащих текст

​zamboga​ используется для совершенно​ показывает найденные адреса​

1. ​ In Sheets a​ книги, и выводит​ А?​

   ​ «замок янтарный»?​ то в ячейку​ регистру (большие и​

2. ​ ними нужно поставить​​ в том же​​Если​​ поиск.​​ из 5 букв,​​Искомый_текст​​ Application.ActiveWorkbook.FullName & «]»​​ _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True,​​: Мой пример кода​
   

3. ​ разных данных («что​​ на других страницах,​​ = [a1].CurrentRegion.Value For​ итоговую таблицу (но​OlesyaSh​Анастасия_П​ В2 ввести текст​​ маленькие буквы). Функция​​ тильду (~).​

   ​ отрезке текста, мы​​.​Чтобы выполнить поиск по​

4. ​ первые 4 из​  — текст, который требуется​​ & sh.Name &​​ Tab:=False, _ Semicolon:=False,​ вернёт массив строк​ ищем» и «где​​ хотя совпадений там​​ i = 1​

5. ​ новом листе или​​: копируете формулу, вставляете​​: Ураааа!!! Работает!!! Спасибо-преспасибо!!!​ «11 казачок».​ НАЙТИ чувствительна к​Если искомый текст не​ получим значение 6,​Для выполнения этой задачи​

   ​ всему листу, щелкните​ которых клад (начиная​ найти.​ «!»»&АДРЕС(» & i​​ Comma:=False, Space:=True, Other:=False,​​ исходного текста -​​ ищем»). Не из-за​​ нет. При этом​​ To UBound(a) For​​ в диалоговом окне),​

6. ​ куда надо и​​ Всем всем всем​​Буду благодарна за​​ регистру символов. Например,​​ был найден приложением​

   ​ так как именно​​ используются функции​ любую ячейку.​ с третьей буквы​Просматриваемая_строка​ & «;» &​ FieldInfo _ :=Array(1,​​ там нет никаких​​ этого ли ошибка​

​ скрипт «помнит» верный​​ j = 1​ где указаны имя​

Проверка ячейки на наличие в ней любого текста

​ сразу же -​Формула не дает​​ помощь.​​ есть список номенклатурных​

Проверка соответствия содержимого ячейки определенному тексту

​ или начальная позиция​ 6 позицию занимает​Если​На вкладке​​ слова докладная).​​  — текст, в которой​

Проверка соответствия части ячейки определенному тексту

​ j & «);»»»​ 1), TrailingMinusNumbers:=True ‘удаляем​​ ячеек и столбцов.​​ работы скрипта? Скрин1​​ адрес с верного​​ To UBound(a, 2)​​ листа, адрес ячейки,​​ держите зажатыми Ctrl​

​ вносить много аргументов…Когда​​IvanOK​​ единиц с артикулом.​​ установлена меньше 0,​

support.office.com

Пример преимущества функции ПОИСК в Excel перед функцией НАЙТИ

​ строчная «а» в​,​Главная​Функция НАЙТИ() учитывает РЕгиСТР​ ищется​ & sh.Name &​ пустые строки LastRow​Vlad999​ http://prntscr.com/dcprvz , скрин2​ листа, и пихает​ t = a(i,​ найденное значение.​ и Shift, нажимаете​ «достраиваю» формулу, так​

Примеры использования функции ПОИСК в Excel

​:​ Необходимо найти позицию​ больше общего количества​ слове «Александр».​Поиск​в группе​ букв и не​Искомый_текст​ «!»»&АДРЕС(» & i​ = ActiveSheet.UsedRange.Row -​: Да, для списка​ http://prntscr.com/dcps49​ этот же адрес​ j) If .exists(t)​При клике переходим​

​ Enter.​ и пишет, что​Анастасия_П​ маленькой буквы «о».​ присутствующих символов, в​Кроме того, функция ПОИСК​и​Редактирование​ допускает использование подстановочных​.​ & «;» &​ 1 + ActiveSheet.UsedRange.Rows.Count​ на входе «что​6. Зачем забивать​

​ для других листов.​ Then .Item(t) =​

• ​ к ячейке, содержащей​потом протягиваете ее​
• ​ слишком много аргументов…​
• ​, ближе к делу​

​Теперь смотрите как ведут​ ячейке отобразиться ошибка​ работает не для​ЕЧИСЛО​нажмите кнопку​ знаков. Для поиска​Нач_позиция​ j & «))»​ ‘определяем размеры таблицы​ ищем» адреса, конечно,​ «пустотой» каждую строчку​ Скрин: http://prntscr.com/dcppym​ .Item(t) & IIf(.Item(t)​ совпадение.​ вниз.​Добавлено через 15 минут​ давайте сюда пример​ себя по-разному эти​ #ЗНАЧ.​ всех языков. От​

​.​Найти и выделить​ без учета регистра,​  — позиция знака в​ If .exists(t) Then​ Application.ScreenUpdating = False​ не нужны.​ только что объявленного​4. В качестве​ = «», «»,​

​Если какое-то слово​к тому же​

​Формула не дает​

​Hugo121​ две функции при​Если «искомый_текст» не найден,​

1. ​ команды ПОИСКБ она​Примечание:​и нажмите кнопку​ а также для​
2. ​ просматриваемой_строке, с которой​ .Item(t) = .Item(t)​ For r =​Мне нужны адреса​ массива?​ исходных данных для​
3. ​ «;») & sh.Name​ нигде не найдено,​ Вам ответили на​ вносить много аргументов…Когда​: Можете переработать кучу​ поиске большой буквы​ возвращается значение ошибки​ отличается тем, что​ Функция​Найти​ поиска с использованием​ должен начинаться поиск.​ & IIf(.Item(t) =​ LastRow To 1​ для списка, в​For Each el​ поиска могут быть​ & «(» &​ то напротив него​ другом форуме))))Урррааааа! Получилось.​ «достраиваю» формулу, так​ готовых решений из​ «О» в критериях​ #ЗНАЧ.​ на каждый символ​поиска​.​ подстановочных знаков пользуйтесь​ Если аргумент​ «», «», «|»)​

​ Step -1 ‘проходим​ котором ищем. И​ In a .Item(el)​

1. ​ не только слова,​ i & «,»​ пишется «не найдено».​
2. ​ Просто чудеса. Но​ и пишет, что​ темы Поиск и​

​ поиска:​​ отсчитывает по 1​не учитывается регистр.​В поле​ функцией ПОИСК().​

​нач_позиция​ & «=ГИПЕРССЫЛКА(«»[» &​ от последней строки​ тут уже схлопывать​ = «» Next​ но и фразы,​ & j &​Т.е. это тоже​

​ все не так​ слишком много аргументов…​ выделение в таблице​

​Отличие №2. В первом​

Пример использования функции ПОИСК и ПСТР

​Пример 1. Есть набор​ байту, в то​В приложении Excel предусмотрено​Найти​Функция ПОИСК() может быть​опущен, то предполагается​ Application.ActiveWorkbook.FullName & «]»​ до первой If​ пустоты нельзя, или​

​7. Что происходит​ а искать надо​

​ «)» Next Next​ самое, что и​ просто, задача на​Казанский​

​ по нескольким параметрам​

​ аргументе «Искомый_текст» для​ текстовой информации с​

​ время как ПОИСКБ​ большое разнообразие инструментов​введите текст —​ использована совместно с​ значение 1.​

​ & sh.Name &​ Application.CountA(Rows(r)) = 0​ есть какое-то другое​ здесь и зачем​ слова. Каюсь, когда​ Next Workbooks.Add ActiveSheet.[a1].Resize(.Count,​ стандартный поиск «CTRL+F»,​ самом деле сложнее.​: Составьте на другом​Рекомендую моё​ функции ПОИСК мы​ контактными данными клиентов​

Пример формулы ПОИСК и ЗАМЕНИТЬ

​ — по два.​ для обработки текстовых​ или номера —,​ функциями ЛЕВСИМВ(), ПРАВСИМВ()​В аргументе​

​ «!»»&АДРЕС(» & i​ Then Rows(r).Delete ‘если​ решение?​ нужен этот кусок:​

​ я описывал задачу,​ 2) = Application.Transpose(Array(.keys,​

Чем отличается функция ПОИСК от функции НАЙТИ в Excel?

​ только задается не​ Боялась что не​ листе таблицу соответствия​Анастасия_П​ можем использовать символы​ и их именами.​Чтобы воспользоваться функцией, необходимо​ и числовых данных.​ вам нужно найти.​ и ПСТР().​

​искомый_текст​ & «;» &​ в строке пусто​По остальным вопросам​

​IIf(.Item(t) = «»,​ то в начале​ .items)) End With​ одно слово, а​ разберусь и сначала​ фрагмент-номер в ст.​: вот вложение​ подстановки для указания​ Информация записана в​ ввести следующую формулу:​

​ Одним из наиболее​ Или выберите из​Например, в ячейке​можно использовать подстановочные​ j & «);»»»​ — удаляем ее​

​ кто-нибудь может подсказать?​ «», «;»)Ведь как​ описания я написал​ End SubТам где​ список слов (фраз).​ проблему озвучила попроще.​ А и В,​Hugo121​ не точного, а​ разных форматах. Необходимо​=ПОИСК(нужный_текст;анализируемый_текст;[начальная_позиция]).​ востребованных является функция​ раскрывающегося списка​А2​

​ знаки — вопросительный​ & sh.Name &​ Next r ‘определяем​zamboga​ я понял, проверка​ «любого слова на​ пусто в столбце​Я не смог​

​ А Может быть​ в ст. С​: Хотя для таких​ приблизительного значения, которое​ найти, с какого​В этой формуле задаваемые​ ПОИСК. Она позволяет​Найти​содержится фамилия и​

exceltable.com

Поиск фрагментов текста в ячейке

​ знак (?) и​​ «!»»&АДРЕС(» & i​
​ последнюю ячейку с​: 6. так создается​ на найденное значение​ ВСЕХ листах открытой​ B, значит не​ изменить все найденные​ получится вообще одной​ «протяните» формулу, которая​ 2-х условий можно​ должно содержаться в​ символа начинается номер​ значения определяются следующим​ определять в строке,​последнего поиска.​ имя «Иванов Иван»,​ звездочку (*). Вопросительный​ & «;» &​ данными With ActiveSheet.UsedRange:​ словарь с уникальными​ происходит тут If​ книги», а вот​ найдено.​ в инете решения​ формулой обойтись. Смысл​ склеит эти данные.​ формулами сделать -​ исходной текстовой строке.​ телефона.​ образом.​ ячейке с текстовой​Примечание:​ то формула =ЛЕВСИМВ(A2;ПОИСК(СИМВОЛ(32);A2)-1)​
​ знак соответствует любому​ j & «;4))»​

​ End With lLastRow​​ (не повторяющимися) значениями.​​ .exists(t) Then, и​​ в конце уже​Hugo121​

​ под себя и​​ в том, что​В основной таблице​ вот начало:​ Вторая функция НАЙТИ​Введем исходные данные в​
​Искомый текст. Это числовая​

​ информацией позицию искомой​​ В условиях поиска можно​

​ извлечет фамилию, а​​ знаку; звездочка —​ Next Next Next​ = ActiveSheet.UsedRange.Row +​ Чтобы при дальнейшей​
​ если значение найдено,​ «все исходные фразы»,​: Спасибо большое! Разобрать​ реализовать такой скрипт,​ если в столбце​
​ используйте такую формулу​=IF((FIND(«янтарный»,LOWER(A2),1)>0)+(FIND(«замок»,LOWER(A2),1)>0)=2,»10 янтарный замок»,»»)Сюда​ не умеет использовать​ таблицу:​ и буквенная комбинация,​ буквенной или числовой​ использовать подстановочные знаки.​ =ПРАВСИМВ(A2;ДЛСТР(A2)-ПОИСК(СИМВОЛ(32);A2)) — имя.​
​ любой последовательности знаков.​ ‘вытаскиваем из словаря​ ActiveSheet.UsedRange.Rows.Count — 1​ проверке не гонять​ то дописать к​
​ хотя имел в​ существующий скрипт я​ т.к. у меня​

​ А листа «отчет»​​ Код =ИНДЕКС(Лист1!$C$1:$C$99;ПОИСКПОЗ(ЛОЖЬ;ЕНД(ПОИСКПОЗ(«*»&Лист1!$A$1:$A$99&»*»;A2;));)) Это​ навесить обработку ошибки​ в работе символы​В ячейке, которая будет​ позицию которой требуется​

​ комбинации и записывать​​Чтобы задать формат для​ Если между именем​ Если нужно найти​
​ ключи (keys) и​ lLastCol = ActiveSheet.UsedRange.Column​ одно и тоже​ существующей строке «имя​ виду слова. Например,​

​ хоть как то​​ очень небольшие знания​ не нашлось фрагмента,​ формула требует ввода​ и ещё вложить​ подстановки масок текста:​ учитывать данные клиентов​ найти.​ ее с помощью​
​ поиска, нажмите кнопку​ и фамилией содержится​ в тексте вопросительный​ их значения (items)​
​ + ActiveSheet.UsedRange.Columns.Count -​ слово несколько раз.​ листа + адрес»​ добавьте в список​

​ могу=)​​ VBA (знаю только​ соответствующего столбцу А​
​ как формула массива,​ аналогичный IF для​ «*»; «?»; «~».​ без телефона, введем​Анализируемый текст. Это тот​
​ чисел.​
​Формат​ более одного пробела,​ знак или звездочку,​ Dim aK, aI,​ 1 ‘задаем массив​

​7. это нужно​​ sh.Name & «(«​ «1. что искать.txt»​В общем, кое​ простейшие операции копировать/вставить,​ листа «списки», просматривается​ т.е. нажатием Ctrl+Shift+Enter,​ казачков.​
​Для примера попробуем в​ следующую формулу:​ фрагмент текстовой информации,​Для нахождения позиции текстовой​и внесите нужные​ то для работоспособности​ следует поставить перед​ aSP, s As​
​ исходных данных ‘a​ чтобы, если слово​ & i &​ слова «изготовить», «сделать»​ как разобрался, сам​ условие, цикл).​ столбец В, если​

​ и отображается в​​Ну или с​

​ этих же исходных​​=ПОИСК(“, тел.”;адрес_анализируемой_ячейки).​
​ из которого требуется​ строки в другой​ изменения во всплывающем​ вышеупомянутых формул используйте​ ними тильду (~).​ String, ss As​ = [a1].CurrentRegion.Value ‘ограничивает​ встречается несколько раз​ «,» & j​ — они есть​ принцип понятен, но​Итого.​ не находится и​ фигурных скобках.​ допстолбцами сделать, чтоб​ строках столбца «наименования»​Нажмем Enter для отображения​ вычленить искомую букву​

​ аналогичной применяют ПОИСК​​ окне​

​ функцию СЖПРОБЕЛЫ().​​Если искомый_текст не найден,​​ String Dim lMaxC​​ диапазон первой пустой​ то, отделить их​ & «)».​

​ в составе фраз​​ не полностью. Также​На входе:​ в нем, то​В таком виде​ голову меньше ломать​ найти приблизительный текст.​ искомой информации:​ или сочетание и​

​ и ПОИСКБ. Расчет​​Найти формат​Примечание:​ возвращается значение ошибки​ As Long, lc​ строкой/столбцом, не подходит​ символом «;»​

​Т.е. все вроде​ в таблице «2.​
​ нашел ошибки в​Список слов (фраз),​ столбец С. Если​ она рассчитана на​ — в соседний​ Для этого укажем​Далее мы можем использовать​ вернуть позицию.​ ведется с первого​.​Мы стараемся как​ #ЗНАЧ!​ As Long aK​ a = Range(Cells(1,​5. А почему​ понятно, кроме строки​ искать тут.xlsx», но​ работе скрипта.​ каждая фраза с​ поможете, будет очень​ таблицу номеров длиной​ столбец вытянуть казачков,​ следующий вид критерия​ любые другие функции​Начальная позиция. Данный фрагмент​ символа анализируемой ячейки.​
​Кнопка​ можно оперативнее обеспечивать​Функция ПОИСК() не учитывает​ = .keys aI​ 1), Cells(lLastRow, lLastCol)).Value​ нет, Словарь мы​ IIf(.Item(t) = «»,​ сейчас их не​Найденные ошибки:1. Скрипт работает​ новой строки​ здорово!! Файл приложилаДобрый​ до 99 записей.​ затем в третий​ поиска используя символы​
​ для отображения представленной​ необязателен для ввода.​ Так, если задать​Параметры​ вас актуальными справочными​ РЕгиСТР букв. Для​ = .items ReDim​ ActiveWorkbook.Close False ‘создаем​ уже создали, взяли​
​ «», «;»)​ находит.​ только в одном,​На выходе:​ день!​ При необходимости поменяйте​ собрать то, что​ подстановки: «н*ая».​

CyberForum.ru

Расширение стандартного поиска. Как искать списки слов в Excel?

​ информации в удобном​​ Но, если вы​ функцию ПОИСК “л”​служит для задания​ материалами на вашем​ поиска с учетом​
​ a(1 To .Count,​ словарь с исходными​ все что нам​8. Вы не​Я попробовал изменить​ текущем листе. Разве​1. Таблица или​Во-первых, спасибо за​ 99 на другое​ без ошибок.​
​Как видим во втором​ формате:​ желаете найти, к​
​ для слова «апельсин»​ более подробных условий​ языке. Эта страница​ регистра следует воспользоваться​
​ 1 To 100)​ данными для поиска​ нужно из «а»​ могли бы объявить​ скрипт и добавил​ кусок For Each​
​ диалоговое окно, которая​ формулу: Код =ИНДЕКС(Лист1!$C$1:$C$99;ПОИСКПОЗ(ЛОЖЬ;ЕНД(ПОИСКПОЗ(«*»&Лист1!$A$1:$A$99&»*»;A25;));))​ число.​Кстати, пример не​ отличии функция НАЙТИ​На рисунке видно, как​ примеру, букву «а»​ мы получим значение​ поиска. Например, можно найти​ переведена автоматически, поэтому​
​ функцией НАЙТИ().​
​ For i =​
​ Set dic =​ и соответственно значения​ и описать все​
​ разделение по столбцам​
​ sh In Sheets​ содержит все исходные​ У меня​Анастасия_П​ соответствует тексту вопроса​ совершенно не умеет​ с помощью формулы​ в строке со​ 4, так как​
​ все ячейки, содержащие​ ее текст может​Формула =ПОИСК(«к»;»Первый канал») вернет​ 1 To .Count​ CreateObject(«scripting.dictionary») dic.comparemode =​ данного диапазона нам​ переменные в начале​ так (записал макрос,​ не для каждого​ фразы и все​
​ возникла проблема, антологичная​: Все работает, благодарю​ — пример проще.​ работать и распознавать​ из двух функций​
​ значением «А015487.Мужская одежда»,​

​ именно такой по​​ данных определенного типа,​ содержать неточности и​
​ 8, т.к. буква​ a(i, 1) =​ 1 With dic​ уже не нужны,​ скрипта, т.к. не​ по другому пока​ листа должен работать?​ найденные ядреса ячеек.​ выше описанным: по​Витушка​ Я делал по​ спецсимволы для подстановки​ ПСТР и ПОИСК​ то необходимо указать​ счету выступает заданная​ такого как формулы.​ грамматические ошибки. Для​ к находится на​ aK(i — 1)​ For Each el​ можно использовать переменную​ везде мне понятно,​ не умею, кроме​ Тогда почему не​ Т.е. эквивалент стандартного​ фрагменту текста найти​: Доброго всем вечера!​ вопросу​ текста в критериях​ мы вырезаем фрагмент​ в конце формулы​ буква в текстовом​Для поиска на текущем​ нас важно, чтобы​ 8-й позиции слева.​

​ s = .Item((aK(i​​ In a If​ «а» дальше.​ что переменная, а​ простейших циклов и​
​ работает?​ окна CTRL+F; поиск​ слово в массиве​У меня похожая​Вообще я не​ поиска при неточном​
​ текста из строк​ 8, чтобы анализ​ выражении.​ листе или во​ эта статья была​Пусть в ячейке​ — 1))) If​ el <> «»​Для тех, кто​
​ что — оператор?​ If-Then):​2. Из-за наличия​ по всей книге;​ и заменить название,​ задача, помогите, плиз,​ формулист — наверняка​ совпадении в исходной​ разной длины. Притом​ этого фрагмента проводился​Функция ПОИСК работает не​ всей книге можно​ вам полезна. Просим​А2​ s <> «»​ Then .Item(el) =​ зайдет из поисковых​Еще раз благодарю​Selection.TextToColumns Destination:=Range(«A1»), DataType:=xlDelimited,​ в исходнике на​ кнопка «Найти все».​ на то, которое​ написать формулу для​ есть решение проще.​ строке.​ разделяем текстовый фрагмент​ с восьмой позиции,​ только для поиска​ выбрать в поле​ вас уделить пару​введена строка Первый​ Then aSP =​
​ «» End If​ систем.​ за помощь.​ _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True,​ листах пустых строк​2. Эта таблица​ требуется по справочнику.​ следующих условий. Если​Анастасия_П​Анастасия_П​ в нужном месте​
​ то есть после​ позиции отдельных букв​Искать​ секунд и сообщить,​ канал — лучший.​ Split(s, «|») lc​ Next ‘ MsgBox​Итоговый рабочий код:​zamboga​ Tab:=False, _ Semicolon:=False,​ (и пустых столбцов!)​ или диалоговое окно​ Мне нужно сделать​ в тексте столбца​: я в вопросе​: Добрый день!​ так, чтобы отделить​ артикула. Если этот​ в тексте, но​вариант​ помогла ли она​ Формула =ПОИСК(СИМВОЛ(32);A2) вернет​ = UBound(aSP) +​ «Список ключей для​Option Explicit Sub​: Ух сколько текста,​
​ Comma:=False, Space:=True, Other:=False,​ кусок a =​ содержит ссылки на​ эту формулу, через​ А «Назначение платежа»​ сами наименования упростила,​Помогите решить задачу.​ ее от номера​
​ аргумент не указан,​ и для целой​Лист​ вам, с помощью​ 7, т.к. символ​ 1 If lMaxC​ поиска:» & vbLf​ pr3() Dim sh​ не осилил…​ FieldInfo _ :=Array(1,​ [a1].CurrentRegion.Value не верно​ ячейки, где встретились​ ЕСЛИОШИБКА. Тоже есть​ листа «отчет» содержится​ а в идеале​ Дана таблица. В​ телефона.​ то он по​ комбинации. Например, задав​или​ кнопок внизу страницы.​
​ пробела (код 32)​ < lc Then​ & vbLf &​
​ As Worksheet, t$​Совсем не нужно​ 1), TrailingMinusNumbers:=TrueСкрипт даже​ определяет массив данных​ совпадения (как и​ пример.​ слово из столбца​ они как в​ первом столбце наименования,​Пример 2. Есть таблица​ умолчанию считается равным​ данную команду для​Книга​ Для удобства также​ находится на 7-й​ lMaxC = lc​ Join(.keys, vbLf) ‘ищем​
​ Dim lLastRow As​ читать текст на​ корректно определяет массив​ для дальнейшей работы.​
​ окно стандартного поиска,​НО! Копирую формулу​ А листа «списки»,​
​ файле…​ содержащие одни и​ с текстовой информацией,​
​ 1. При указании​ слов «book», «notebook»,​.​ приводим ссылку на​ позиции.​ End If For​ в словаре совпадения​ Long, lLastCol As​ лист, можно без​ для работы, только​ Из-за этого кучу​ чтобы можно было​ значение принимает верное.​ то в столбце​
​Казанский​ те же слова,​ в которой слово​ начальной позиции положение​
​ мы получим значение​Нажмите кнопку​ оригинал (на английском​Формула =ПОИСК(«#???#»;»Артикул #123# ID»)​ lc = LBound(aSP)​ на наших листах​ Long, LastRow As​ этого обойтись:​
​ вот в итоге​ строчек скрипт не​

​ перейти к конкретной​​ Ввожу руками, результат​ В «Филиал» на​
​: Код =ЕСЛИ(ЕОШ(ПОИСК(«казачок»;A2));ЕСЛИ(ЕОШ(ПОИСК(«янтарный замок»;A2));»?»;»10​ но записаны по​ «маржа» нужно заменить​ искомого фрагмента все​
​ 5, так как​Найти все​ языке) .​ будет искать в​ To UBound(aSP) ss​ For Each sh​ Long, r As​a = Split(CreateObject(«Scripting.FileSystemObject»).Getfile(ActiveWorkbook.Path​

​ ничего не находит.​​ проверяет. Я не​ ячейке на конкретном​ не корректный… Что​ листе «отчет» должно​ янтарный замок»);»11 казачок»)​ разному. Например: «коньяк​ на «объем».​ равно будет считаться​ именно с этого​
​или​Предположим, что вы хотите​ строке «Артикул #123#​ = aSP(lc) a(i,​ In Sheets ‘определяем​ Long, i As​

​ & «1. Искать​​ Вопрос, как сделать,​ знаю, как верно​ листе)​ делаю не так​ встать соответствие из​

​ В примере работает.​​ Янтарный замок», «Янтарный​Откроем книгу Excel с​ с первого символа,​ по счету символа​
​Найти далее​ убедиться, что столбец​ ID» последовательность из​ lc + 2)​ последнюю ячейку с​ Long, j As​ это.txt»).OpenasTextStream(1).ReadAll, vbNewLine)И не​
​ чтобы скрипт искал​ задать весь диапазон​

​3. Для слов​​ не понятно. Когда,​ столбца В листа​Вот так логически​ замок коньяк 0,5″,​ обрабатываемыми данными. Пропишем​ даже если начальные​ начинается искомое слово​
​.​ содержит текст, не​ 5 символов, которая​ = ss Next​ данными With sh.UsedRange:​
​ Long Dim PathFileTxt​ будет проблем с​ по словам, а​ данных с учетом​ и фраз, для​ ввожу «»,слежу, чтобы​ «списки». Для примера​ проще «достраивать» формулу​ «коньяк Янтарный замок​ формулу для поиска​

​ 8 были пропущены​ «book».​Найти все​
​ номера. Или perhapsyou​
​ начинается и заканчивается​ End If Next​ End With lLastRow​ As String Dim​ пустыми строками, их​ не по фразам?​ пустых строк и​ которых ничего не​ стояла английская раскладка​ написала что должно​ для других наименований:​ трехлетний 0,5″, «водка​ нужного слова «маржа»:​ в анализе. То​Используют функцию ПОИСК наряду​списки каждого экземпляра​ необходимо найти все​ на знак #.​ ‘создаем новую книгу​ = sh.UsedRange.Row +​ dic As Object​ правда есть смысл​ (разделитель — пробел.​ пустых столбцов кроме​ найдено, выводится «не​ на клавиатуре.​ получиться. Выбирать фильтром​ Код =ЕСЛИ(ЕЧИСЛО(ПОИСК(«казачок»;A2));»11 казачок»;ЕСЛИ(ЕЧИСЛО(ПОИСК(«янтарный​ казачок», «казачок водка​Теперь дополним формулу функцией​ есть в рассматриваемом​ с такими, как:​ элемента, который необходимо​ заказы, которые соответствуют​Чтобы найти позицию второго​ Workbooks.Add ‘вставляем данные​ sh.UsedRange.Rows.Count — 1​ Dim el As​ отсеивать при переборе​ Другие символы, типа​ как Cells.Select, и​ найдено».​Очень хочется понять​ очень долго(​ замок»;A2));»10 янтарный замок»;»?»))​ 0,7л». Во второй​ ЗАМЕНИТЬ:​ примере букве «а»​НАЙТИ (осуществляет поиск с​ найти, и позволяет​ определенным Продавец. Если​ вхождения буквы «а»​ на лист ActiveSheet.[a1].Resize(.Count,​ lLastCol = sh.UsedRange.Column​ Variant Dim a​ массива (с нуля!)​ «/», если будут​ я не смог​Помогите мне, пожалуйста=)​ как работает эта​Витушка​Hugo121​ столбец нужно ввести​Функция ПОИСК очень схожа​ в строке «А015487.Мужская​ учетом регистра);​ сделать активной ячейки,​ у вас нет​ в строке «мама​ lMaxC + 1).FormulaLocal​ + sh.UsedRange.Columns.Count -​ Windows(«искать тут.xlsm»).Activate ‘альтернативный​Hugo121​ по ходу встречаться,​ в этой части​zamboga​ формула, в в​: пример прилагаю​: В вопросе Вы​ текст «10 янтарный​ с функцией НАЙТИ​ одежда» будет присвоено​ПСТР (возвращает текст);​ выбрав нужное вхождение.​ проблемой верхний или​ мыла раму» используйте​ = a Columns(«B:XFD»).EntireColumn.AutoFit​ 1 ‘задаем массив​ способ задать массив​: Если не ошибаюсь,​ заменю на пробел​ поправить скрипт (как​: Вот один из​ целом, и где​Витушка​ как раз усложнили​ замок», если ячейка​ по принципу действия.​ значение 14.​ЗАМЕНИТЬ (заменяет символы).​ Можно сортировать результаты​ нижний регистр текста,​ формулу =ПОИСК(«а»;»мама мыла​ Range(«A1»).Activate Application.ScreenUpdating =​ a = sh.Range(sh.Cells(1,​ без открытия файла.​ то если отбросить​ сам, такой код​ я понимаю, «Cells.Select»​ вариантов:​ допускаешь ошибку…Формула не​: Формула​ — то «янтарный​ содержит текст «янтарный​ Более того у​При работе с аргументом​Важно помнить, что рассматриваемая​Найти​ существует несколько способов​ раму»;ПОИСК(«а»;»мама мыла раму»)+1).​ True ‘ MsgBox​ 1), sh.Cells(lLastRow, lLastCol)).Value​ не подходит для​ пустые строки и​ мне по силам)​ работает с «экранными»​Sub pr() Dim​ выдает ошибку, она​Казанский​ замок», то «замок​ замок» и если​ них фактически одинаковые​ «искомый_текст» можно использовать​ команда ПОИСК не​все, щелкнув заголовок.​ проверки, если ячейка​ Чтобы определить есть​ «Done!» ‘ ActiveWorkbook.Close​ ‘a = [a1].CurrentRegion.Value​ фраз, состоящих более​ столбцы при построении​Вопросы по частям​ данными, а ваш​ sh As Worksheet,​ возвращает 0, если​прекрасно работает и​ янтарный», поэтому я​ ячейка содержит текст​ аргументы. Только лишь​ следующие подстановочные знаки.​ учитывает регистра. Если​Примечание:​ содержит текст.​ ли третье вхождение​ False End With​ ‘ограничивает диапазон первой​ чем из одного​ массива, то в​ кода, с которыми​ скрипт работает в​ t$ PathFileTxt =​ нет замены.​ для Вашего примера​ и предложил тот​ «казачок», то ввести​ названия аргументов отличаются,​Вопросительный знак (?). Он​ мы с помощью​ Чтобы прекратить процесс поиска,​Для поиска текста можно​ буквы «м» в​ End Sub​ пустой строкой/столбцом ‘забиваем​ слова. ‘a =​ итоге не получится​

CyberForum.ru

​ ничего не понятно.​