대안을 FormulaArray

Question

와 나는 다음과 같은 정보와 워크 시트가있는 경우 :

| A | B | C | 
| 10 | cat |   | 
| 15 | cat |   | 
| 5 | dog |   | 
| 4 | dog |   | 
| 11 | dog |   | 
| 6 | fish |   | 
| 10 | fish |   | 

내가 B 컬럼에 값에 따라 그들을 그룹화하여 컬럼의 최대 값 인 발견 할을 . 즉, 고양이와 개, 물고기에 대한 최대 값.

는 제가 Max 및 If 기능 함수 FormulaArray 사용에 대해 생각

:

mysheet.range("C1:C7").FormulaArray="=Max(If(R1C2:R7C2=RC[-1],R1C1:R7C1))" 

그것을 테스트하지만 작업 그다지이 수식은 전체 범위 (B1과 제 소자 (B1)을 비교한다 : B7).

더 좋은 대답이 있습니까?

Answer 1

는이 같은 MAX 및 INDEX의 조합을 사용할 수 있습니다

Answer 2

배열 수식은 하나의 결과 또는 여러 개의 결과를 반환 할 수 있습니다. 범위의 각 셀에 대해 단일 결과를 반환하기를 원하지만 배열 수식을 전체 범위에 적용하기 때문에 단일 수식 대신 전체 범위에 대해 여러 결과를 반환하는 단일 수식으로 해석됩니다. 각 세포.

배열 범위에서 변경하여 테스트 할 수 있습니다. C3에서 ", 0)"을 "1"로 변경하십시오. 배열의 일부를 변경할 수 없다는 것을 알려줍니다. 그들은 모두 연결되어 있습니다.

당신이해야 할 일은 범위의 셀을 반복하고 각각의 수식을 적용하는 것입니다.

Dim r As Range 
Dim rFormulas As Range 
Set rFormulas = ActiveSheet.Range("C2:C8") 
For Each r In rFormulas.Cells 
    r.FormulaArray = "=MAX(IF(R2C2:R8C2=RC2,R2C1:R8C1,0))" 
Next r