vba -- Consolidate (통합) 사용 ; 중복 data 합산하기

vba -- Consolidate (통합) 사용  ; 중복 data 합산하기

환경 ; 엑셀 2013

참고 ;  https://msdn.microsoft.com/ko-kr/library/office/ff839594(v=office.14).aspx

** 주의 ; 헤더가 없으면 결과 다르게 나온다.

<< 실행 결과 >>

<< vba 코드 >>

Sub main()

    Worksheets("Sheet1").Range("A10").Consolidate _

    Sources:=Array("Sheet1!R2C2:R6C3", "Sheet1!R4C6:R7C7"), _

    Function:=xlSum, toprow:=True, leftcolumn:=True

End Sub

** 소스는 R1C1-style 로 표시한다.  ( Row 몇번째, Column 몇번째 식 표현)

<< 시트 이름 사용시 예제 >>