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

Массивы в языке 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) ' Получаем значение

Visual Basic for Applications (VBA)
Самоучитель по VBA

Помощь сайту

Yandex-деньги: 410011140483022

ПАО Сбербанк:
Счет: 40817810855006152256
Реквизиты банка:
Наименование: СЕВЕРО-ЗАПАДНЫЙ БАНК ПАО СБЕРБАНК
Корреспондентский счет: 30101810500000000653
БИК: 044030653
КПП: 784243001
ОКПО: 09171401
ОКОНХ: 96130
Скриншот реквизитов

Поиск по сайту в Яндексе