Макросы занятие 10. Работа с массивами.

Массивы

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

Массив описывается только явным образом. Например:

Dim mass(200) as Integer

Приведенная запись показывает, что будет использована переменная mass, в которой для каждого индекса от 0 до 199 могут храниться различные целые числа. Если размерность заранее не определена, то в описании указывается пустой массив, а по ходу выполнения программы размерность переопределяется при помощи оператора ReDim.

Sub ggg()

Dim mass() as Integer

----

----

ReDim mass(200)

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

Dim fio(1001) as String или изменить описание Dim fio(1 to 1000) as String

Множество значений массива можно «зашить» внутрь программного кода при помощи переменной Variant и инструкции Array. Такие инструкции могут быть использованы,

Например, в некий массив ms() требуется поместить заранее известные значения, прописанные в программном коде. Подпрограмма может выглядеть так:

Sub massiv_array() ‘Объявление подпрограммы

Dim I%, Razm%, ms() as Integer, Mm as Variant ‘Объявление переменных и массивов

Mm=Array(2, 4, 6, 8, 14, 16, 24, -60) ‘Присвоение области значений переменной

Razm=InputBox(“Введите размерность”,,7) ‘Диалог о размерности

Redim ms(Razm+1) ‘Переобъявление размерности массива

For I =1 to Razm ‘ Цикл для присвоения

ms(i)=Mm(i) ‘значений элементам массива из области переменной Mm

Next I ‘

End sub