Excel 2016에서 VBA 프로그래밍을 위한 배열 작업

대부분의 프로그래밍 언어는 VBA를 포함한 배열을 지원합니다. 어레이 이름을 공유 변수의 그룹이다. 괄호 안에 배열 이름과 인덱스 번호를 사용하여 배열의 특정 변수를 참조합니다. 예를 들어, 12개의 문자열 변수 배열을 정의하여 해당 연도의 월 이름을 저장할 수 있습니다. 배열의 이름을 MonthNames 로 지정하면 배열 의 첫 번째 요소를 MonthNames(1)로, 두 번째 요소를 MonthNames(2) 등으로 참조할 수 있습니다.

배열 선언

배열을 사용하려면 먼저 선언 해야 합니다. 예외 없음. 일반 변수와 달리 VBA는 이 규칙에 대해 매우 엄격합니다. 일반 변수를 선언하는 것처럼 Dim 또는 Public 문을 사용하여 배열을 선언합니다. 그러나 배열의 요소 수도 지정해야 합니다. 첫 번째 색인 번호, 키워드 To 및 마지막 색인 번호를 모두 괄호 안에 지정하여 이 작업을 수행합니다. 다음 예제에서는 100개의 정수 배열을 선언하는 방법을 보여줍니다.

Dim MyArray(1 ~ 100)를 정수로

배열을 선언할 때 상위 인덱스만 지정하도록 선택할 수 있습니다. 하위 인덱스를 생략하면 VBA는 인덱스가 0이라고 가정합니다. 따라서 다음 두 명령문은 모두 동일한 101개 요소 배열을 선언합니다.

Dim MyArray(0 ~ 100)를 정수로
Dim MyArray(100)를 정수로

VBA가 1(0이 아닌)이 배열의 하위 인덱스라고 가정하도록 하려면 모듈 상단의 선언 섹션에 다음 명령문을 포함하십시오.

옵션 베이스 1

이 문은 VBA가 상위 인덱스만 선언하는 배열의 첫 번째 인덱스 번호로 1을 사용하도록 합니다. 이 명령문이 있는 경우 다음 명령문은 동일하며 둘 다 100개 요소 배열을 선언합니다.

Dim MyArray(1 ~ 100)를 정수로
Dim MyArray(100)를 정수로

다차원 배열

이전 예제에서 만든 배열은 모두 1차원 배열입니다. 1차원 배열을 한 줄의 값으로 생각하십시오. VBA에서 생성한 배열은 60차원까지 가질 수 있습니다. 하지만 배열에서 2차원 또는 3차원 이상을 필요로 하는 경우는 거의 없습니다. 다음 예제는 2차원을 갖는 81-정수 배열을 선언합니다:

Dim MyArray(1 ~ 9, 1 ~ 9)를 정수로

이 배열은 9 x 9 행렬을 차지하는 것으로 생각할 수 있습니다. 모든 숫자를 스도쿠 퍼즐에 저장하는 데 적합합니다.

이 배열의 특정 요소를 참조하려면 두 개의 인덱스 번호를 지정해야 합니다(행렬의 "행" 및 "열"과 유사). 다음 예에서는 이 배열의 요소에 값을 할당하는 방법을 보여줍니다.

마이어레이(3, 4)= 125

이 문은 배열의 단일 요소에 값을 할당합니다. 9 x 9 행렬의 관점에서 배열을 생각하고 있다면 행렬의 세 번째 행과 네 번째 열에 있는 요소에 125를 할당합니다.

1,000개의 요소가 있는 3차원 배열을 선언하는 방법은 다음과 같습니다.

Dim My3DArray(1 ~ 10, 1 ~ 10, 1 ~ 10)를 정수로

3차원 배열을 큐브로 생각할 수 있습니다. 3차원 이상의 배열을 시각화하는 것은 더 어렵습니다.

동적 배열

동적 배열을 생성할 수도 있습니다 . 동적 배열에는 미리 설정된 수의 요소가 없습니다. 빈 괄호 세트를 사용하여 동적 배열을 선언합니다.

Dim MyArray()를 정수로

이 배열을 사용하려면 먼저 ReDim 문을 사용하여 배열에 몇 개의 요소가 있는지 VBA에 알려야 합니다. 일반적으로 배열의 요소 수는 코드가 실행되는 동안 결정됩니다. 필요에 따라 배열의 크기를 변경하여 여러 번 ReDim 문을 사용할 수 있습니다. 다음 예제는 동적 배열의 요소 수를 변경하는 방법을 보여줍니다. NumElements 변수에 코드에서 계산한 값이 포함되어 있다고 가정합니다.

ReDim MyArray(1에서 NumElements까지)

ReDim을 사용하여 배열의 치수를 재지정하면 배열 요소에 현재 저장된 모든 값이 지워집니다. Preserve 키워드를 사용하면 이전 값이 손상되는 것을 방지할 수 있습니다. 다음 예제에서는 배열을 재정의할 때 배열의 값을 보존하는 방법을 보여줍니다.

ReDim Preserve MyArray(1에서 NumElements까지)

MyArray에 현재 10개의 요소가 있고 NumElements가 12인 앞의 명령문을 실행하면 처음 10개의 요소는 그대로 유지되고 배열에는 2개의 추가 요소를 위한 공간이 있습니다(변수 NumElements에 포함된 수까지). 그러나 NumElements가 7이면 처음 7개 요소는 유지되지만 나머지 3개 요소는 소멸됩니다.