- •Дисциплина:
- •Часть 1. Техническое и программное обеспечение
- •Тема 9:
- •9.1 Макропрограммирование в приложениях Microsoft Office 3
- •9.2 Программирование в среде vba 26
- •9.1 Макропрограммирование в приложениях Microsoft Office
- •9.1.1 Создание макросов в Word
- •9.1.2 Назначение макросов кнопкам панелей инструментов и пунктам меню
- •9.1.3 Создание макросов в Excel
- •Рекомендации по выполнению задания
- •9.1.4 Создание макросов в PowerPoint
- •9.2 Программирование в среде vba
- •9.2.1. Настройка рабочей среды редактора Visual Basic
- •9.2.2 Создание процедур-подпрограмм
- •9.2.3 Создание процедур-функций
9.1.2 Назначение макросов кнопкам панелей инструментов и пунктам меню
& Макросам можно назначать кнопки на панелях инструментов или пункты в стандартных меню команд. Кнопки можно располагать как на имеющихся панелях инструментов, так и на созданных пользователем.
Любые действия по настройке и созданию меню и панелей инструментов производятся в режиме редактирования инструментов в окне Настройка, которое можно открыть одноименной командой из меню Сервис, Вид/Панели инструментов, контекстного меню на панели инструментов.
Все операции с настраиваемыми элементами осуществляются только при открытом окне Настройка. Так, чтобы удалить любую кнопку с панели инструментов, следует открыть окно Настройка и перетащить кнопку мышью за пределы панели инструментов, например в область окна Настройка.
В среде Word для документа Макросы_Word создать свою панель инструментов Фамилия (указать свою фамилию) для размещения на ней кнопок запуска макросов.
Рекомендации по выполнению
Откройте окно Настройка командой Вид/Панели инструментов/ Настройка (или командой Настройка в контекстном меню на панели инструментов).
На вкладке Панели инструментов нажмите [Создать] и в открывшемся окне Создание панели инструментов задайте следующее:
в поле Панель инструментов введите имя создаваемой панели – Фамилия (т.е. свою фамилию, например Захаров);
из открывающего списка Сделать панель доступной для выберите – Макросы_Word.doc и нажмите [ОК].
Закройте окно Настройка кнопкой [Закрыть]. В результате отобразится панель инструментов Захаров (рис. 9.4).
Рис. 9.4 Панель инструментов Захаров
Примечание. Удаляется панель инструментов кнопкой [Удалить] в окне Настройка.
На панели инструментов Фамилия создать кнопку для запуска макроса ЗаданиеW2.
Рекомендации по выполнению
В документе Макросы_Word убедитесь, что включена панель инструментов Фамилия. Если она отсутствует, включите ее командой Вид/Панели инструментов/Фамилия.
Создайте кнопку для запуска макроса ЗаданиеW2:
откройте окно Настройка;
на вкладке Команды в списке Категории выберите – Макросы, а в списке Сохранить в – Макросы_Word;
в списке Команды выделите макрос Normal.NewMacros.ЗаданиеW2 и перетащите его при нажатой левой клавише мыши на панель инструментов Фамилия;
Примечание. При выполнении последующих действий, создаваемая кнопка на панели Фамилия должна быть выделена, иначе изменения могут быть применены к другой кнопке.
нажимая кнопку [Изменить выделенный объект] в окне Настройка установите: отображение кнопки без текста флажком Основной стиль; название кнопки Перестановка_Слов в поле Имя; изображение кнопки командой Выбрать значок для кнопки.
Закройте окно Настройка.
Проверьте работу созданной кнопки на любом фрагменте текста. Обратите внимание на всплывающую подсказку при наведении мыши на кнопку.
На панели инструментов Фамилия для запуска макроса ЗаданиеW3 создать кнопку с нарисованным изображением.
Рекомендации по выполнению
Создайте кнопку для запуска макроса ЗаданиеW3, назовите ее Граница и выберите для нее изображение.
Измените изображение кнопки, например на красный квадрат:
выделите созданную кнопку при открытом окне Настройка и нажмите [Изменить выделенный объект];
в открывшемся меню выберите команду Изменить значок на кнопке;
в открывшемся окне Редактор кнопок создайте рисунок и нажмите [ОК];
закройте окно Настройка.
Проверьте работу созданной кнопки.
Добавить в линейку меню приложения Word новый пункт МакросыФамилия для размещения в нем команд запуска макросов.
Рекомендации по выполнению
Откройте окно Настройка.
На вкладке Команды в списке Категории выберите Новое меню, и из списка Команды мышью перетащите пункт Новое меню в линейку меню окна Word, разместив после меню Окно.
Задайте имя для нового меню. Для этого в окне Настройка нажмите кнопку [Изменить выделенный объект] и в выпадающем меню в поле Имя введите – МакросыФамилия.
Закройте окно Настройка.
Примечание. Удаляется команда меню ее перетаскиванием в окно Настройка.
Создать в меню МакросыФамилия команду для запуска макроса ЗаданиеW1.
Рекомендации по выполнению
Откройте окно Настройка.
На вкладке Команды в списке Категории выберите Макросы.
Создайте команду меню для запуска макроса ЗаданиеW1. Для этого выделите макрос Normal.NewMacros.ЗаданиеW1 в списке Команды и перетащите его при нажатой левой клавише мыши в меню МакросыФамилия.
Измените название новой команды меню: в окне Настройка нажмите кнопку [Изменить выделенный объект] и в поле Имя введите – ЗаданиеW1_Фамилия (фамилию укажите свою).
Закройте окно Настройка.
Проверьте работу созданной команды меню. Для этого в новом документе вставьте произвольный фрагмент текста и выполните команду МакросыФамилия/ЗаданиеW1_Фамилия.
Сохраните документ Макросы_Word.
Продемонстрировать преподавателю результаты работы в файле Макросы_Word с панелью инструментов Фамилия, включающей 2 кнопки для запуска макросов ЗаданиеW2 и ЗаданиеW3 и с меню МакросыФамилия с командой запуска макроса ЗаданиеW1.
Удалить созданные макросы, кнопки и команды их вызова.
