Функция заполнения массива - VBA
Формулировка задачи:
Массив через код VBA заполняется так:
Можно ли написать функцию, в которую передавалось бы значение n, далее в функции заполнялся сам массив, и далее функция возвращала бы заполненный массив в процедуру?
Решение задачи: «Функция заполнения массива»
textual
Листинг программы
Sub uuu() Dim a() '-------------- a = GetArray(5) End Sub Function GetArray(ByVal n&) As Variant Dim a() Dim i&, j& '---------------- ReDim a (1 To n, 1 To 5) For i = 1 To n For j = 1 To 5 a(i, j) = InputBox("X=") Next Next GetArray = a End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д