Пример макроса по обработке диапазона ячеек

На листе Excel в диапазоне А1:Н8 ячейки верхнего треугольника заполнен некоторым символом так, как показано на рисунке. Требуется зеркально отобразить этот треугольник на нижние строки диапазона.

Текст подготовленного макроса, названного нами ExchangeSquare(), представлен ниже. Он записан в том же модуле Лист1, что и наш первый макрос GoodTime(). Разделительную черту между макросами редактор ставит сам - ее видно вверху окна.

VBА ячейки активного листа Excel имеют имена Cells(i, j), где i - номер строки, j - номер столбца. С помощью вложенных циклов For и оператора присваивания осуществляется переписывания 4-ой строки в 5-ую, 3-ей в 6-ую и т.д. После выполнения макроса диапазон ячеек будет иметь вид:

Заметим, что при отображении ячеек при помощи макроса Exchange Square() фон ячеек нижних строк не изменился. Вернемся к этому вопросу позже (раздел 10).

Упражнение

На листе Excel подготовьте матрицу вещественных чисел размером 7x7. Создайте макрос, который бы менял местами два любых столбца матрицы.

Не нашли, что искали? Воспользуйтесь поиском: