2010-04-29 3 views
0

셀 A1에는 컴퓨터 (HDD, Proccessor, GFX 등)에 대한 설명이 있으며 셀 B1-10에는 프로 억세스 목록이 있습니다.범위의 문자열에서 특정 값을 찾으려면 Excel UDF 루프

GetProccessor (A1, B1 : B10) 내가 함께 VBA에서의 구문 분석 할 필요가 알고

: 변형 등

기능 GetProccessor (텍스트 셀 (C1)에 다음과 같이 looke 것 엑셀 UDF이다 , rRange as Range)

그렇다면 나는 범위 루프에 매우 열악하므로 붙어 있습니다. 아무도 내게 약간의 포인터를주지 않습니까?

+0

@Sam 이것은 이전 질문과 비슷합니다. 당신의 의도는 1) C1 셀의 함수가 C1 값을 반환해야한다. (이것은 아마도 이상적이다.) 2) C1 셀의 함수가 B1-B10 셀의 값을 변경해야한다. 후자의 옵션은 UDF에서 불가능합니다. 다른 질문에 대한 답에서 설명했습니다. 그러나 이전 옵션은 효과가 있으며 더 나은 방법입니다. –

+0

안녕 벤, 나는 다른 사람과 아마 같은 세부 사항, 질문 havent 물었다! 결국 해결책을 찾았습니다. 내가 읽은 예제 중 일부를 잘못 이해했습니다 ... 답변 됨 아래에 게시 됨 – Sam

+0

Sam : Q + A 사이트입니다. 질문을해야합니다. 해결할 문제/질문을 결코 정의하지 않았기 때문에 대답은 이해가되지 않습니다. – RBarryYoung

답변

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 
관련 문제