|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
- 엑셀 버전(95,97,2000,xp,2003,2007):2016
* 아래줄에 질문을 작성하세요 >>
안녕하세요
셀안에 문장들이 빈공간으로 구분되어 있으며
a b c 1+2+3=6
a a b c 1+1+2+3=7
a a a a 1+1+1+1=4
d ac 4+11=15
ab ac aa aa 10+11+12+12=45
구분되어진 문자는 아래 테이블에 값을 가지고 있습니다.
구분 값
a 1
b 2
c 3
d 4
e 5
f 6
g 7
h 8
i 9
ab 10
ac 11
aa 12
==============[건데기님 글에 대한 답변입니다]==============
첨부화일 참조하세요...
아래 사용자 정의함수를 이용했습니다...
Function uSum(rX As Range, rRef As Range)
Dim rFInd As Range
Dim vSpl, vX
Dim lSum As Long, ltmp As Long
Application.Volatile
vSpl = Split(rX.Value, " ")
For Each vX In vSpl
ltmp = 0
Set rFInd = rRef.Columns(1).Find(What:=vX, LookAt:=xlWhole)
If Not rFInd Is Nothing Then
ltmp = rFInd.Cells(1, 2)
End If
lSum = lSum + ltmp
Next
uSum = lSum
End Function
|
|