Excel UDF循环，用于从范围内的字符串中查找特定值

Question

在单元格A1中，我描述了一台计算机(硬盘、处理器、GFX等)，在单元格B1-10中，我有一个处理器列表，我想要的是一个excel UDF，它在单元格C1中看起来像这样：

GetProccessor(A1，B1:B10)

我知道我需要在VBA中使用以下命令进行解析：

GetProccessor函数(文本作为变量，rRange作为范围)

然后我被卡住了，因为我的range循环很差，有人能给我一些指点吗？

Answer 1

获取部件函数，我自己做出来的！

Function GetPart(text As Variant, rCells As Range)
  Dim txt As String
  Dim rRange As Range
  Dim SubjCell

  For Each rRange In rCells
    SubjCell = rRange
    txt = text

    If InStr(txt, SubjCell) <> 0 Then
      GetPart = SubjCell
      Exit For
    Else
      GetPart = "Not Found"
    End If
  Next rRange

End Function