전달 배열 내가 질문에이 개 기능이 다른 사용자 정의 함수

Question

에서 반환

=HLOOKUPRANGE({"Color", "Red", "Alpha", 50}, A1:Z30, SELECTED_INDEX) 
=HLOOKUPRANGE({"Color", "Blue", "Alpha", 100}, A1:Z30, SELECTED_INDEX) 

를하지만 내가 어떻게 할 수 있습니다 : 내 엑셀 워크 시트에서

' Starting from first row, navigate through headers (rows) in lookup_range and return cell value at row_index if we reach a single column Range at the end of navigation; N/A otherwise. 
Public Function HLOOKUPRANGE(headers() As Variant, lookup_range As range, row_index As Integer) As Variant 
' returns the minimum value in search range that is greater than or equal to target. 
Public Function MINGE(search As range, target As Variant) As Variant 

을의 HLOOKUPRANGE는 다음과 같이 작동합니다 그것과 같은 다른 함수로 작동합니까? :

=HLOOKUPRANGE({"Color", "Red", "Alpha", MINGE(A4:Z4, INPUT_ALPHA_VALUE)}, A1:Z:30, SELECTED_INDEX) 

Excel에서 {} 사이에 MINGE를 넣지 않습니다. 그리고 문제는이 방식으로 배열을 전달하는 것입니다. MINGE의 결과를 HLOOKUPRANGE에 전달하려면 어떻게해야합니까?

팁 : MINGE는

Answer 1

두 내가 생각할 수있는 방법 ...

WAY 1

배열을 결합하는 제 3 함수를 작성 "같거나 최소 큰"입니다 MINGE 값. 나는 HLOOKUPRANGE와 MINGE가 무엇을하는지 모르기 때문에 샘플을 만들었지 만 그 개념은 동일합니다.

이 예에서는 SID()가 HLOOKUPRANGE를 모방합니다. 그러나이 순간 않습니다 모두가 당신이

=SID({1,2,3,4,5}) 

가 당신에게 합계 (15)을 줄 것이다 입력 이제 우리의 합을 원하는 말할 수있는 경우

그래서 값을 요약한다

=SID({1,2,3,4,5,MINGE()}) 

MINGE()의 수치는 6 곳이 당신이 코드는 간다 (21)을 줄 것이다 우리가 그것을

=SID(Unite({1,2,3,4,5},6)) 

할 것 어떻게 나는 당신의 기능에 동일하게 적용한다면 모듈은

Option Explicit 

Dim TempAr() As Variant 

Public Function Sid(headers() As Variant) As Variant 
    Dim temp As Long, i As Long 
    For i = LBound(headers) To UBound(headers) 
     temp = temp + headers(i) 
    Next i 
    Sid = temp 
End Function 

Public Function Unite(MyArray() As Variant, Vl As Variant) As Variant 
    Dim n As Long, i As Long 

    n = UBound(MyArray) 

    ReDim Preserve TempAr(n + 1) 

    For i = LBound(MyArray) To UBound(MyArray) 
     TempAr(i) = MyArray(i) 
    Next i 

    TempAr(n + 1) = Vl 
    Unite = TempAr 
End Function 

그것은 당신이 선택 받아 약간 HLOOKUPRANGE 기능을 바꿀 수 2

이

=HLOOKUPRANGE(UNITE({"Color", "Red", "Alpha"},MINGE(A4:Z4, INPUT_ALPHA_VALUE)), A1:Z30, SELECTED_INDEX) 

WAY과 같을 것 값. 예 : 수식

= SUM ({1,2,3,4,5}, {6})은 워크 시트에서 위와 동일한 작업을 수행합니다.

그래서 당신은 때문에이 방식으로 배열을 전달하는 아니다,이

=HLOOKUPRANGE({"Color", "Red", "Alpha"}, A1:Z30, SELECTED_INDEX,MINGE(A4:Z4, INPUT_ALPHA_VALUE))) 

또는

=HLOOKUPRANGE({"Color", "Red"}, A1:Z30, SELECTED_INDEX,MINGE(A4:Z4, INPUT_ALPHA_VALUE)),SELECTED_INDEX,MINGE(B4:B4, INPUT_ALPHA_VALUE)))