Многомерные массивы

Массивы в языке VBA могут быть многомерными. Объявление многомерного массива имеет следующий формат:

Dim <Имя массива1>([<Начальный индекс> To]<Максимальный индекс>[,
             ..., [<Начальный индекс> To]<Максимальный индекс>])
                  [As <Тип>]
    [, ...,
    <Имя массиваN>([<Начальный индекс> To]<Максимальный индекс>[,
             ..., [<Начальный индекс> To]<Максимальный индекс>])
                  [As <Тип>]]

Если параметр <Начальный индекс> не задан, то используется значение из инструкции Option Base. Если инструкция отсутствует, то начальный индекс будет равен нулю.

На практике наиболее часто используются двухмерные массивы, позволяющие хранить значения ячеек таблицы, содержащей определенное количество строк и столбцов. Пример объявления двухмерного массива, содержащего две строки и четыре столбца:

Dim Массив(1, 3) As Integer
' или Dim Массив(0 To 1, 0 To 3) As Integer
Массив(0, 0) = 1
Массив(0, 1) = 2
Массив(0, 2) = 3
Массив(0, 3) = 4
Массив(1, 0) = 5
Массив(1, 1) = 6
Массив(1, 2) = 7
Массив(1, 3) = 8
Debug.Print Массив(1, 3) ' Получаем значение

Объявление массивов с большей размерностью производится аналогичным образом и отличается только количеством чисел внутри круглых скобок. Пример:

Dim Массив(1, 3, 3) As Integer
Массив(0, 0, 0) = 1
Массив(1, 3, 3) = 8
Debug.Print Массив(1, 3, 3) ' Получаем значение
Предыдущая статья Все статьи Следующая статья