string - 如果 ColA 中的一个单元格包含来自 ColC 列表的子字符串，那么该子字符串是否可以在 ColB 中返回？

Question

我在 ColC 中有一个词干列表，我想通过 ColA 进行搜索以查看:

(1) 单元格是否包含子字符串之一？
(2) 它包含哪个子串？

我可以通过多种方式回答第一个问题，包括:

=INDEX(C2:C25,MATCH(FALSE,ISERROR(FIND("*"&C2:C25&"*",A2)),0))

我只是不能做第二个，并将值返回到 ColB。

例如，A2 abacavir包含 vir它在列表中(C25)。我想让 B2 说 vir ，而不是“真”或“1”。

此外，如果 ColA 中的单元格包含列表中的多个值，ColB 是否可以提供多个值？

Answer 1

VBA 在这里可能是最简单的。插入一个模块并将下面的代码粘贴到其中。然后确保选择数据所在的工作表，然后运行名为“stem”的宏。

Sub stem()

Dim stem As String
Dim lastRow As Long
Dim f As Variant
Dim fRow As Long

lastRow = ActiveSheet.Cells(ActiveSheet.Rows.Count, "A").End(xlUp).Row
i = 2

With ActiveSheet

    Do

        stem = .Cells(i, 3).Value

        With .Range("A1:A" & lastRow)

            Set f = .Find(stem, LookIn:=xlValues)

            If Not f Is Nothing Then
                fRow = f.Row
                ActiveSheet.Cells(fRow, 2).Value = stem
            End If

        End With

        i = i + 1

    Loop Until .Cells(i, 3) = ""

End With

End Sub