|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
- 엑셀 버전(2010):
* 아래줄에 질문을 작성하세요 >>
오래간만에 할려니까 도무지 로직이 안돌아 가서 질문을 해봅니다.
그림에 보듯이 A배열의 행열값이 B배열의 값을 참조 순환 하면서 같은 값이면 A배열의 값을 B배열의 같은값 아래 에 넣는 방법에 대해서
도움을 받고자 합니다.
==============[선샤인님 글에 대한 답변입니다]==============
아래 사용자 정의함수을 이용하세요
A2:K2을 선택하여 야해 수식을 배열수식으로 입력
{ =getResult($A$1:$K$1, $M2:$R2) }
Function getResult(rData As Range, rT As Range)
Dim vData, vT
Dim vResult() As String
Dim iX As Integer, iY As Integer
Application.Volatile
vData = rData.Value
vT = rT.Value
ReDim vResult(1 To UBound(vData, 2))
For iX = 1 To UBound(vT, 2)
For iY = 1 To UBound(vData, 2)
If vT(1, iX) = vData(1, iY) Then
vResult(iY) = vT(1, iX)
End If
Next
Next
getResult = vResult
End Function
|
|