Разработка автоматизированного рабочего места студента по изучению темы Создание макросов в интегрированной среде разработки Visual Basic

Подождите немного. Документ загружается.

 Эта книга - макрос сохраняется в модуль текущей книги и, как следствие, будет

выполнятся только пока эта книга открыта в Excel

 Новая книга - макрос сохраняется в шаблон, на основе которого создается любая

новая пустая книга в Excel, т.е. макрос будет содержаться во всех новых книгах,

создаваемых на данном компьютере начиная с текущего момента

 Личная книга макросов - это специальная книга Excelb с именем Personal.xls,

которая используется как хранилище макросов. Все макросы из Personal.xls

загружаются в память при старте Excel и могут быть запущены в любой момент и в

любой книге.

Послеbвключения записиbи выполненияbдействий, которые необходимо

записать,bзапись можно остановитьbкомандой Сервис - Макрос - Остановить запись (Tools

- Macro - Stop Recording).

2.2.3. Особенности макроса

2.2.3.1. Запуск и редактирование макросов

Управление всеми доступными макросами производится в окне, которое можно

открыть через меню Сервис - Макрос - Макросы (Tools - Macro - Macros):

 Любой выделенный вbсписке макрос можно запустить кнопкой Выполнить (Run).

 Кнопка Параметры (Options) позволяет посмотреть и отредактировать сочетание

клавиш для быстрого запуска макроса.

 Кнопка Изменить (Edit)bоткрывает редактор Visual Basic (см. выше) и позволяет

просмотреть и отредактировать текст макроса на VBA.

2.2.3.2. Переименование и удаление макросов

Если пользователь находит, что макрос более не требуется, его можно легко удалить из

иллюстрации. Макросы можно также переименовывать.

Чтобы переименовать весь контейнер записываемых макросов — модуль RecordedMacros:

 Выбрать модуль в окне Project Explorer.

 Щелкнуть по имени модуля в окне Properties (Свойства). (Если это окно не

открыто, нажать на панели инструментов кнопку Properties Window (Окно свойств)

Щ или нажать <F4>.)

 Отредактировать имя модуля.

 Нажать клавишу <Enter>.

 На панели инструментов нажать кнопку Save (Сохранить) Щ, чтобы сохранить

изменения в проекте.

Таким образом можно переименовать любой объект в окне Project Explorer. Описанная

процедура полезна, например, для создания нескольких категорий макросов. После

переименования модуля Recor-dedMacros и выполнения записи следующего макроса

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

дать имя новой группы макросов. Это мы продемонстрировали первый способ

переименования макроса.

Можно ещё воспользоваться другим способом переименования макроса:

 Для переименования макроса необходимо войти в режим редактирования макроса

и в тексте программы изменить заголовок. Новое имя автоматически заменит

старое в списках макросов, и по клавишам быстрого вызова будет вызываться

макрос с новым именем.

2.2.3.3. Переименование в отдельный макрос в модуле:

В окне Project Explorer дважды щелкнуть по модулю, в котором хранится макрос.

(Узнать, в каком модуле находится макрос, можно в окне диалога CorelDRAW 11 VBA

Macros . В списке Macros in (Макросы в) показаны доступные проекты VBA, а формат

имен макросов в пределах проекта следующий: имя_модуля.имя_макроса.)

2. В окне программного кода модуля найти процедуру Sub требуемого макроса.

3. Переименовать процедуру.

4. На панели инструментов нажать кнопку Save (Сохранить).

2.2.3.4. Чтобы удалить модуль:

 В окне Project Explorer щелкнуть по модулю, например, RecordedMacros правой

кнопкой мыши и в контекстном меню выбрать Remove RecordedMacros.

 В окне запроса подтверждения ответить Yes (Да).

2.2.3.5. Чтобы удалить отдельный макрос:

 В меню Tools (Сервис) выбрать команду Visual Basic и далее Play (Запуск) или на

панели инструментов Visual Basic for Applications нажать кнопку Run a VBA Macro

(Выполнить макрос)

 В окне диалога CorelDRAW 11 VBA Macros в списке Macros in (Макросы в)

выбрать проект VBA, в котором хранится макрос.

 Выбрать макрос из списка макросов.

 Нажать кнопку Delete (Удалить).

Можно и так:

 В окне Project Explorer дважды щелкнуть по модулю, в котором хранится макрос.

 В окне кода модуля найти процедуру Sub требуемого макроса.

 Выделить текст процедуры от Sub до End Sub включительно.

 Нажать клавишу <Delete>.

 На панели инструментов нажать кнопку Save (Сохранить)

2.2.3.6. Преобразование глобальных макросов во внутренние и наоборот

Отдельные части глобального проекта VBA (модули, формы, классы, отдельные

макросы) можно преобразовывать во внутренние макросы, встраивая их в документ.

Для этого нужно:

1. Открыть документ, внедрить макросы.

2. Перейти в окно редактора VBA.

3. В панели Project Explorer найти требуемый проект GMS, открыть его структуру и найти

в нем нужный макрос или модуль.

4. Щелкнуть по объекту и перенести его на проект открытого документа (проект

выделяется). Объект будет скопирован в документ.

5. Из глобального проекта модуль можно удалить (см. выше).

6. Щелкнуть по проекту GMS и на панели инструментов нажать кнопку Save (Сохранить),

чтобы сохранить его.

7. Щелкнуть по проекту документа и сохранить его также.

Внутренний макрос можно преобразовать в глобальный.

Процедура здесь более длинная — вначале нужно создать файл глобального проекта:

1. В Проводнике Windows перейти в папку GMS - \nantca_CorelDraw_l 1\ Draw\GMS\.

2. Создать новый пустой файл: щелкнуть правой кнопкой мыши на поле папки и выбрать

New (Создать) | Text Document (Текстовый документ).

3. В рамке редактирования дать новому документу описательное имя и расширение .GMS.

4. Запустить CorelDRAW и открыть документ, содержащий нужный внутренний макрос

или модуль.

5. Перейти в окно редактора Visual Basic. В структуре Project Explorer будет

присутствовать новый пустой проект — теперь есть контейнер для сохранения

внутреннего макроса.

6. Найти в структуре нужный внутренний макрос.

7. Щелкнуть по макросу и перенести его на новый пустой проект GMS. Объект будет

скопирован в проект.

8. Из внутреннего проекта макрос или модуль можно удалить.

9. Щелкнуть по проекту GMS и на панели инструментов нажать кнопку Save (Сохранить),

чтобы сохранить его.

10. Щелкнуть по проекту документа и также сохранить его.

Теперь внутренний макрос стал глобальным.

2.2.3.7. Назначение кнопки панели инструментов для запуска макроса

Макрос можно запустить с помощью кнопки на встроенной панели инструментов, для

этого необходимо выполнить:

 Выбрать команду Настройка в меню Сервис.

 В окне диалога Настройка выбрать вкладку Команды и выбрать параметр Макросы

в списке Категории, в списке Команды выделить «Настраиваемая кнопка».

 Из списка Команды перетащить с помощью мыши настраиваемую кнопку на

панель инструментов.

 Щелкнуть эту кнопку правой кнопкой мыши и выбрать команду Назначить макрос

в контекстном меню.

 Ввести имя макроса в поле Имя макроса.

2.2.3.8. Назначение области графического объекта для запуска макроса:

 Создайте графический объект.

 К выделенному bграфическому объекту, примените контекстное меню.

 Выберите в контекстном меню команду Назначить макрос.

 В появившемся окне диалога "Назначить макрос объекту", введите название

макроса в поле «Имя макроса», затем нажмите кнопку OK.

Апробация основных и одновременно, простых операций с

макросом

3.1. Создание макроса

Создадим макрос для автоматического суммирования двух чисел в ячейках A1, B1 и

размещения результата в ячейке C1, а также заливки ячейки C1 бирюзовым цветом.

Алгоритм создания макроса для поставленной задачи:

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

2. В поле Имя макроса введите имя для макроса.

Первым символом имени макроса должна быть буква. В имени макроса не допускаются

пробелы; в качестве разделителей слов можно использовать знаки подчеркивания.

3. Для того чтобы запускать макрос с помощью сочетания клавиш, введите букву в поле

Сочетание клавиш. Допускается использование сочетаний CTRL+ буква (для строчных

букв) или CTRL+SHIFT+ буква (для прописных букв), где буква — любая буквенная

клавиша на клавиатуре. Не выбирайте стандартного сочетания клавиш, так как выбранное

сочетание клавиш подавляет стандартные сочетания клавиш Microsoft Excel на то время с

данной книгой.

4. В поле "Сохранить" выберите книгу, в которой требуется сохранить макрос.

Сохраните макрос в «Эта книга». Для создания краткого описания макроса, введите

необходимый текст в поле Описание. На скриншоте представлен пример заполнения окна

диалога «Запись макроса»

5. Нажмите кнопку OK.

6. Выполните макрокоманды, которые нужно записать.

7. Нажмите кнопку Остановить запись на плавающей панели инструментов «Ос»

(Остановить запись) или Сервис / Макрос / Остановить макрос.

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

Редактор VBA автоматически записал последовательность макрокоманд или программу

по выполненным действиям:

Для вызова макроса необходимо выполнить команду Сервис / Макрос / Макросы. После

этого в диалоговом окне со списком макросов его можно найти по имени и нажать кнопку.

Выполнить.

3.2. Редактирование макроса

Редактирование макроса осуществляется редактором VBA, для этого необходимо

выполнить следующее:

1. Выбрать команду Сервис / Макрос / Макросы

2. Выбрать имя макроса, который следует изменить, в списке Имя.

3. Нажать кнопку Изменить, будет открыто окно Visual Basic, в котором возможно

редактирование команд выбранного макроса, записанных на языке Visual Basic.

Удаление макроса:

- В меню Сервис выберите команду Макрос, а затем — команду Макросы.

- В списке макросов текущей рабочей книге необходимо выбрать макрос, который

предполагается удалить и нажать кнопку - Удалить.

Заключение

В этой работе мне удалось рассмотреть функции макроса (запуск и редактирование

макроса, переименование и удаление макроса, переименование в отдельный макрос в

модуле, удаление макроса, преобразование глобальных макросов во внутренние и

наоборот), а так же я рассмотрел операцию создания макроса разными способами. После

в апробации я рассмотрел отдельный макрос и проделал с ним операцию,

редактирования.

Завершая эту работу, хочу заметить, что Visual Basic 6 намного легче, чем обычный и

старенький Basic, но и с Visual Basic 6 не так легко работать, если у человека нет

начальных навыков программиста, зато из-за удобного интерфейса весьма увлекательно.

Список литературы и электронных пособий

1. Брайан Сайлер и Джефф Споттс – Специальное издание «Использование Visual Basic

6».

2. www.planetaexcel.ru

3. http://tid.com.

4. http://books.kulichki.net

5. http://bit.pirit.info/forum/viewtopic.php?t=2160

6. http://kurs-vb.narod.ru/a2.htm

7. http://www.coreldraw11.ru/text/13/page/2

8. http://wordexpert.ru/2008/01/15/sozdanie-makrosa-iz-gotovogo-koda/

9. http://www.statsoft.ru/home/portal/applications/svb_adviser/examples.htm

10. http://www.twirpx.com/file/2355/