Excel - 使用命名范围查找并将找到的单词复制到相邻单元格

Question

我有很长的句子列表，以及我需要在每个句子中识别的一长串单词。

句
杰克和吉尔一起去参加聚会 吉尔喜欢保罗，但他不知道她存在 吉尔和杰克一起去参加派对让保罗嫉妒 吉尔摔倒了，打破了她的王冠 杰克在吉尔之后翻滚，因为他迷恋她。

命名范围词
到
该
党
以及
假设在命名范围内有超过100个单词。

输出

句子词 杰克和吉尔一起去参加聚会。 ，党， 吉尔喜欢保罗，但他不知道她存在 吉尔和杰克一起去参加派对让保罗嫉妒。派对

非常感谢任何帮助！〜

Answer 1

用户是否定义了这样的功能？

Function COMBINETEXT(Sentence_Range As Range, Key_Range As Range)

Dim c As Range
Dim output As String
‘output = Sentence_Range & " "

For Each c In Key_Range.Cells
On Error GoTo errorHandler
        If Application.WorksheetFunction.Search(c.Value, Sentence_Range) > 0 Then output = output & "/" & c.Value
errorHandler:
Next c
output = right(output,len(output) -1) ‘Will get rid of first /
COMBINETEXT = output

End Function