Excel несколько формула НАЙТИ

Question

Я не эксперт по Excel, поэтому любая помощь приветствуется!

Я пытаюсь заставить одну ячейку выполнять несколько поисков в другой.

Я знаю, что для поиска в одной ячейке определенного слова вы бы использовали = FIND(синий, C2)

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

Мне нужно показать все аллергены в клетке ингредиентов, например, арахис, глютен, молоко, семена кунжута и т.д.

Как мне получить результат, чтобы перечислить все аллергены?

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

Спасибо

Answer 1

Я хотел бы предложить два возможных метода. 1-е - Формула, 2-е - МАКРО.

Способ 1:

=IFERROR(IF(OR(SEARCH(B1,A1)>0,SEARCH(C1,A1)>0,SEARCH(D1,A1)>0,SEARCH(E1,A1)>0),"Found",""),"Nfound")

Замечания:

• Запишите эту формулу в ячейку G1 и перетащите ее вниз.
• Вы можете расширить формулу, если больше текста / слов для поиска.

Способ 2:

• На активном листе нажмите Alt+F11 чтобы открыть VB Editor .
• Скопируйте и вставьте приведенный ниже код в качестве стандартного модуля .
• Выберите диапазон A1:A3 , где вы хотите найти текст / слова, чтобы выделить .
• Запустить макрос.
• Введите слова в INPUT BOX через запятую и нажмите ОК

Макрос выделит жирным шрифтом Лицо, найденное в диапазоне A1:A3 .

Sub MultiFindNBoldFace()

Dim strSearch As String
Dim arySearch As Variant
Dim searchRng As Range
Dim cel As Range
Dim i As Long, ii As Long


Set searchRng = Application.Selection
strSearch = InputBox("Please enter the text to make bold as a comma delimited list (Abc,Xyz) - No spaces:", "Bold Text")
If strSearch = "" Then Exit Sub
arySearch = Split(strSearch, ",")
For Each cel In searchRng

With cel

.Font.Bold = False
For ii = LBound(arySearch) To UBound(arySearch)

i = InStr(cel.Value, arySearch(ii))
If i > 0 Then

.Characters(i, Len(arySearch(ii))).Font.Bold = True
End If
Next ii
End With
Next cel

End Sub

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