2010-04-29 45 views
0

在单元格A1中,我有一台计算机(HDD,Proccessor,GFX等)的描述,在单元格B1-10中我有一个进程列表,我想要什么是Excel UDF将looke像这样在小区C1:Excel UDF循环从范围中的字符串中查找特定值

GetProccessor(A1,B1:B10)

我知道我需要解析在VBA具有:

功能GetProccessor(文本为Variant ,rRange作为范围)

然后我卡住了,因为我与范围循环很差,可以有人给我一些指点?

+0

@Sam这感觉很像你以前提出的问题。你的意图是1)C1单元中的函数应该返回一个C1的值(这可能是理想的)或者2)单元格C1中的函数应该改变单元格B1-B10中的值?后一种选择对于UDF来说是不可能的,正如我在回答你的其他问题时所描述的那样。但是,前一种选择将起作用,并且会是一种更好的做法。 – 2010-04-29 12:28:52

+0

嗨,本,我还没有问过一个问题,可能跟其他人一样!我最终发现了解决方案,简单地误解了我读的一些例子... 下面发布的答案 – Sam 2010-04-29 15:58:25

+0

Sam:这是一个Q + A网站,你应该问一个问题。你的回答毫无意义,因为你从未定义过要解决的问题。 – RBarryYoung 2013-04-22 23:27:39

回答

0

获取部件功能,自己搞定!

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