Программирование в среде Visual Basic for Applications
Программирование в среде Visual Basic for Applications: - Страница 9

3. Автоматическая запись макроса и его редактирование

2. Выберите записанный макрос в списке макросов основного приложения, используя команду Сервис/Макрос/Макросы, а затем нажмите кнопку Изменить. При этом запускается редактор VBA и в окне модуля выводится текст созданного макроса, который можно изменить или добавить комментарии.

Рассмотрим следующий пример.

Предположим, что необходимо очистить содержимое ячеек Al, Bl, С1 рабочего листа (например, в ячейках Al, Bl, С1 находятся значения 1, 2 и 3 соответственно).

Создадим макрос.

1. Выполним команду Сервис/Макрос/Начать запись.

2. Присвоим макросу имя ClearCellData и нажмем кнопку ОК.

3. Выполним над ячейками Al, Bl, С1 рабочего листа следующие действия. Выделим блок ячеек А1:С1 с помощью мыши и нажмем кнопку Delete.

4. Остановим запись, нажав кнопку Остановить запись.

5. Просмотрим результат. Выполним команду Сервис/Макрос/Макросы. Выберем в списке макросов макрос с именем ClearCellData и нажмем кнопку Изменить. В результате на экране откроется окно редактора VBA с текстом только что созданного макроса:

Sub ClearCellData () ' ClearCellData Макрос

1 Макрос записан 23.05.00 (Демидов Андрей)

Range("Al:С1").Select Selection.ClearContents End Sub

6. Добавьте комментарии к строкам программы (комментарий должен начинаться с апострофа). Например:

Range("Al:CI").Select Л Выделение блока ячеек Selection.ClearContents Л Очистка содержимого

' выделенного блока

Программирование в среде Visual Basic for Applications

7. Добавьте новую строку, например,

Range("A3:СЗ").Select 4 Выделение блока ячеек

8. Проследите, какие действия выполнит макрос после редактирования. Для этого выполните команду Сервис/Макрос/ Макросы, выберите макрос ClearCellData и нажмите кнопку Выполнить.

Созданный макрос можно назначить какой-либо панели инструментов или комбинации клавиш, выбрав соответствующий переключатель в группе Назначить макрос диалогового окна Запись макроса.

4. Простейшие функции и процедуры. Типы переменных

4.1. Функция пользователя

Рассмотрим простейшую задачу, которую можно решить с помощью VBA, - создание функции пользователя, имеющей имя. Функция пользователя, после своего создания, заносится в библиотеку функций. С созданными пользователем функциями можно работать с помощью мастера функций точно так же, как и со встроенными функциями рабочего листа. Функция рабочего листа, определенная пользователем, - это процедура Function, которую можно указать в формуле, хранящейся в ячейке.

Создадим, например, функцию пользователя, математически

определенную следующим образом [2]: у = s'm(70c)e~2x.

Функция пользователя разрабатывается точно так же, как и любая функция VBA. Она хранится в модуле и описывается с помощью ключевого слова Public. Параметром функции является значение или ссылка на ячейку. По умолчанию Excel присваивает модулям имена: Модуль1, Модуль2 (Modulel, Modu-1е2) и т. д. Для создания модуля выполните команду Сервис/ Макрос/Макросы. Введите имя макроса (рис. 4.2), например функция, и нажмите кнопку Создать. В результате откроется приложение VBA, в котором будет открыт уже существующий модуль (или создан новый), например Модуль1. На экране будут выведены строки:



 
 
 
Powered by Exponenta -