이 예는 엑셀 VBA의 지역 수집을 보여줍니다. 우리는 범위 ( “C3, C5 : E5 B2”)을 경계했다 아래. 이 범위는 두 개의 영역이 있습니다. 쉼표는 두 영역을 분리한다.

Areas Collection in Excel VBA

워크 시트에 명령 단추를 놓고 다음 코드 줄을 추가

  1. 먼저, 우리는이 범위 객체를 선언합니다. 우리는 범위 rangeToUse 및 singleArea 개체를 호출합니다.

Dim rangeToUse As Range, singleArea As Range

  1. 우리는 범위 ( “C3, C5 : B2 E5”)와 Range 개체의 rangeToUse를 초기화

Set rangeToUse = Range("B2:C3,C5:E5")

  1. rangeToUse 영역의 수를 계산 다음 코드 줄을 추가하려면 :

MsgBox rangeToUse.Areas.Count

결과 :

Count Areas

  1. 인덱스 값을 사용하여 rangeToUse의 다른 영역을 참조 할 수 있습니다. 다음 코드 라인은 제 1 영역 세포의 수를 계산합니다.

MsgBox rangeToUse.Areas(1).Count

결과 :

Count Cells

  1. 또한 rangeToUse의 각 영역을 반복하고, 각 영역의 셀의 개수를 카운트 할 수있다. 매크로 아래 트릭을 수행합니다.

For Each singleArea In rangeToUse.Areas

MsgBox singleArea.Count

Next singleArea

결과 :

Count Cells

Count Cells

/ VBA – 예 – 비교 – 범위 [비교 범위]`: 지역 수집의 실제 예를 들어, 우리의 예제 프로그램 ‘링크를 참조하십시오.