Определение: Массив – это набор однотипных данных, имеющий общее для всех своих элементов имя. Если речь идет о хранении в массиве таблицы значение (матрицы), его элементы нумеруются двумя индексами.
Декларация двумерного массивов в VBA.
Dim Имя_Массива(n,m) As Тип
В этом массиве первый элемент имеет номер (0,0), а последний – (n,m).
Для привычного задания массива, где первый элемент имеет номер (1,1), при описании массива указывается первый и последний номер элемента через зарезервированное слово VBA «To»:
Dim Имя_Массива (1 To n, 1 To m) As Тип
Алгоритм ввода двумерного массива.
Пошаговое словесное описание выполнения алгоритма ввода массива a(n,m):
1. i = 1
2. Еслиi <= n, то шаг 3, иначе шаг 103. j = 14. Еслиj <= n, то шаг 5, иначе шаг 85. Ввод a(i, j)6. j = j + 1
7. шаг 48. i = i + 1
9. шаг 210. …..
Алгоритм ввода массива, записанный на языке VBA:
For i = 1 to n
For j = 1 to m
a(i, j) = Cells(i, j).Value
Next j
Next i
Примечание. Ввод массива a(i, j) производится с рабочего листа.
Блок-схема алгоритма ввода двумерного массива a(n, m) приведена на рис7.а.
Алгоритм вывода двумерного массива.
Пошаговое словесное описание выполнения алгоритма вывода массива a(n):
1. i = 1
2. Еслиi <=n, то шаг3, иначе шаг 103. j = 14. Еслиj <= m, то шаг 5, иначе шаг85. Вывод a(i, j)6. j = j + 1
7. шаг 48. i = i + 1
9. шаг 2 10. …..
Алгоритм вывода массива, записанный на языке VBA:
For i = 1 to n
For j = 1 to m
Cells(i, j).Value = a(i, j)
Next j
Next i
Примечание. Вывод массива a(i, j) производится на рабочий лист.
Блок-схема алгоритма вывода двумерного массива a(n, m) приведена на рис.7б.
Рис.7а
Рис.7б
Задача 5. В массиве X(4, 5) посчитать количество не нулевых элементов.