Просмотр записанного макроса

Просмотр записанного макроса заключается в просмотре непосредственно сгенерированного текста кода VBA при его записи. Для этого, выполнив команду Сервис/Макрос/Редактор Visual Basic или нажав комбинацию клавиш [Alt+F11], откройте приложение Microsoft Visual Basic (рис.14.).

При запуске Редактора Visual Basic в этом приложения присутствуют три основных окна:

• окно проекта;
• окно свойств;
• окно программы.

Окно проекта

Окно проекта расположено слева вверху (рис. 14.) и содержит несколько папок. В нашем случае имеются папка Microsoft Excel Объекты, (рис.15.) в которой находятся объекты, с которыми производятся действия:

• Лист1 (КомандировочноеУдостоверение);
• Лист2 (ЖурналРегистрацииКУ);
• ЭтаКнига (в которой записаны эти макросы).

Вторая папка - Модули, в которой находится элемент Модуль1 (рис. 14.), содержащий записанные макросы вывода на печать 1-й и 2-й страницы.

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

Окно проекта предназначено для управления различными элементами проекта VBA и открывается с помощью команды Вид/Окно проекта.

Если обратиться к окну проекта, показанному на рис. 15. то в объекте Модули находится один элемент Модуль1. Это тот элемент, который создан автоматически при записи макросов вывода документов на печать.

Окно свойств

Окно свойств находится в левом нижнем углу (рис. 14.).

В окне свойств перечисляются характеристики элементов проекта. Для изменения свойств элемента, выделите его в окне проекта и тогда его характеристики отобразятся в окне свойств. Если выделить элемент Модуль1, то в окне свойств отобразится его имя: Модуль1. Для изменения имени модуля в окне свойств измените значение свойства Name, введя новое имя - Печать (рис. 16.).

Окно программы

Окно программы самое большое и находится справа (рис. 14.).

Именно в нем происходит запись текста макроса на языке VBA. Окно программы имеет два режима просмотра:

• представление полного модуля;
• представление процедуры.

Переключение между этими режимами осуществляется с помощью кнопок, находящимися в левом нижнем углу окна программы.

В режиме представления процедуры отображается только один макрос. Для перехода к следующему макросу, его имя нужно выбрать в раскрывающемся списке в верхней части окна программы или воспользоваться клавишами [Ctrl +Page Up] и [Ctrl+Page Down].

В режиме представления в окне программы находятся все макросы, в записанной последовательности. На рис.14. показан режим представления.

Ознакомимся с кодом VBA макроса ПечатьЛицевойСтороны. Если окно программ закрыто, то для просмотра макроса в окне проекта активизируйте двойным нажатием на правую кнопку мыши элемент Печать объекта Модули.

Рис.14. Приложение Microsoft Visual Basic с записанными макросами вывода на печать лицевой и обратной стороны документа

Рис.15. Окно проекта

Рис.16. Окна Проектов и Свойств с переименованным элементом Модуль1 в элемент Печать

Исследование записанного макроса

Текст макроса в окне программы содержит следующие элементы (рис.14.):

• ключевые слова Sub и End Sub, означающие начало и конец текста макроса, шрифт которых выделен синим цветом
• имя макроса, которое следует за ключевым словом Sub начала макроса;
• комментарии, шрифт которых выделен зеленым цветом;
• код VBA или непосредственно записанные действия, которые выполняет макрос.

Комментарии. В нашем примере это те данные, которые вводились в диалоговое окно Запись макроса (рис. 12.). Строка комментария предназначена для описания действий и начинается с апострофа. Удаление комментариев никоим образом не влияет на выполнение макроса. Более подробно комментарии будут рассмотрены далее.

И, наконец, код записанных действий, выполняемых макросом: ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1 говорит о том, что с активного окна выделенного (активного) рабочего листа отправить на печать страницы с 1-й по 1-ю в количестве одной копии.

Текст макроса, который начинается и заканчивается ключевыми словами Sub и End Sub, называется подпрограммой или процедурой, что одно и то же.

Запуск записанных макросов на выполнение из приложения Excel

Запуск макросов на выполнение может осуществляться как из приложения Microsoft Visual Basic, так и из приложения Microsoft Excel. Из Excel выполнение макроса задается двумя способами:

• используя комбинации назначенных клавиш при записи макроса [Ctrl+z] - печать лицевой стороны или [Ctrl+x], для печати обратной стороны командировочного удостоверения;
• используя диалоговое окно Макрос.

Рис.17. Диалоговое окно Макрос

Диалоговое окно Макрос (рис. 17.) вызывается командой Сервис/Макрос/Макросы или комбинацией клавиш [Alt+F8]. Для выполнения макроса выделите в списке имя макроса и нажмите кнопку Выполнить.

С помощью этого же диалогового окна можно войти в выделенный в списке макрос, для чего нажмите на кнопку Войти. Это позволит открыть приложение Microsoft Visual Basic и в выбранном макросе будет выделена первая строка с ключевым кодом начала подпрограммы и его именем. Этот режим называется режимом отладки.