VBA3. Переменные, процедуры, функции, циклы, массивы

Date: 2015-10-07; view: 473.

Предположим, что на листе Excel в диапазоне ячеек (R1C1 : RmCn) находится таблица данных, а ячейки столбца n+1 и строки m+1, примыкающие к таблице, - пусты.

1 2 3 - номера столбцов: j=1,…..,n

Требуется разместить на листе Excel командную кнопку с заголовком Вычислить, а в модуль, соответствующий листу Excel, включить подпрограммы-функции Mrow и Ncol для определения m и n, процедуру TabA для копирования таблицы с листа Excel в двумерный массив A, а также событийную процедуру, которая должна включать в себя:

1) резервирование переменных i, j, m, n типа Integer,

2) резервирование переменной S типа Single,

3) резервирование массива A без указания его размерности, т.е. Dim A( ) As Single,

4) определение m и n путем использования функций Mrow и Ncol,

5) переопределение размерности массива A, т.е. ReDim A (1 To m, 1 To n),

6) копирование таблицы в массив A с помощью процедуры TabA,

7) вычисление и размещение в строке, имеющей номер m+2, сумм по столбцам.