Презентации к уроку
Внимание! Предварительный просмотр слайдов используется исключительно в ознакомительных целях и может не давать представления о всех возможностях презентации. Если вас заинтересовала данная работа, пожалуйста, загрузите полную версию.
Цель урока: закрепить практические навыки создания макросов на языке VBA
С помощью макросов, созданных на языке VBA, можно вставлять в презентацию программные коды для автоматизации различных задач (например, обучающие, контролирующие, игровые программы). Для этого будем использовать элементы управления и пользовательские формы.
Задание 1
Создать проект «Проверь себя», включающий задания для проверки навыков устного счёта и знания правил грамматики русского языка. Числа формируются случайные из заданного диапазона [1, n]. Программа должна подсчитывать количество решённых примеров и количество верных ответов.
Перед началом работы запустите программу Power Point и установите низкий уровень безопасности (СЕРВИС – Макрос – Безопасность).
1. Создайте титульный слайд № 1.
2. Создайте слайд № 2 – Меню, предназначенное для выбора предметной области: математика, русский язык. Настройте гиперссылки для перехода на соответствующие слайды № 3 (математика) и № 4 (русский язык) (Рисунок 1).
Рис. 1. Слайд № 2 «Меню»
3. Создайте слайд № 3 (Математика). Разместите на слайде 4 командные кнопки (CommandButton) с помощью панели Элементов управления (Вид – панели инструментов – элементы управления).
4. С помощью автофигур (панель Рисования) создайте на слайде кнопку «Выход», настройте её на завершение презентации. Для этого в контекстном меню кнопки выберите Настройка действия – По щелчку мыши – Перейти по гиперссылке – Завершить показ.
5. Установите свойства командных кнопок. В контекстном меню кнопки CommandButton1 нужно выбрать пункт Свойства и установить свойства в соответствии с таблицей. Аналогично установите свойства остальных кнопок.
Свойство
Пояснение
Значение
Внешний вид слайда показан на Рисунке 2.
Рис. 2 Слайд № 3 «Математика»
6. Создайте программные коды каждой кнопки для вызова пользовательских форм (UserForm). Для этого в контекстном меню кнопки выбрать команду «Исходный текст» (или выполнить двойной щелчок по кнопке). Откроется окно программного кода. После заголовка процедуры нужно ввести команду для открытия соответствующей формы:
7. Добавьте в проект 4 пользовательские формы командой Insert – UserForm.
8. Перейдите на форму UserForm1 и разместите на ней необходимые элементы управления. Вид формы показан на Рисунке 3. В таблице указаны только элементы управления, которые используются в программном коде. Остальные метки используются для поясняющих надписей на форме. Свойства элементов управления установите самостоятельно.
Элемент управления
Пояснение
Назначение
Рис. 3 Интерфейс формы UserForm1
9. Добавим в проект модуль (Insert – Module), в котором опишем глобальные переменные и их тип. Эти переменные будут доступны для всех пользовательских форм проекта.
a, b – переменные для хранения слагаемых, будут генерироваться с помощью функции случайного числа;
S – переменная для хранения суммы;
k – количество примеров
n – количество верных ответов
z – переменная для хранения максимального значения диапазона случайных чисел.
Global a, b, s, n, k As Integer, z As Integer
10. Создайте программные коды для формы UserForm1 «Сложение».
11. Сохраните работу и проверьте работоспособность всех кнопок.
12. Аналогично создайте программные коды для форм «Вычитание» (UserForm2), «Умножение» (UserForm2), «Деление» (UserForm2).
13. Для вычитания введём проверку логического условия, чтобы из большего числа вычитать меньшее:
14. Для деления введём проверку на кратность чисел, чтобы числа делились нацело:
15. Создайте слайд № 4 (Русский язык). Разместите на слайде 4 командные кнопки (CommandButton) с помощью панели Элементов управления. Свойства кнопок настройте аналогично слайду № 3. В названиях кнопок укажите правила русского языка (выберите их самостоятельно). Например: «НН и Н», «ЖИ и ШИ» и т.д.
16. Добавьте в проект ещё 4 пользовательские формы, по одной на каждое правило.
17. Перейдите на форму UserForm5 и разместите на ней необходимые элементы управления. Вид формы показан на Рисунке 4. В таблице указаны только элементы управления, которые используются в программном коде.
Элемент управления | ||
Label6 | метка | для вывода надписи «Количество верных ответов» |
TextBox1-8 | текстовые поля | для ввода пропущенных букв |
Label15 | метка | для вывода надписи «Ошибки выделены красным цветом» |
Label14 | метка | для вывода переменной n (количество верных ответов) |
CommandButton1 | кнопка | Проверка (проверяет ответы и выдаёт результат) |
CommandButton3 | кнопка | Назад (для возврата назад в меню) |
CommandButton2 | кнопка | Далее (переход к следующей форме с заданиями) |
Рис. 4 Интерфейс формы UserForm5
18. Создайте программный код для кнопки «Проверка».
19. Аналогично создайте программные коды для остальных форм и сохраните проект.
Задания для самостоятельной работы
- Придумайте задания для проверки знаний по информатике и добавьте их в проект.
- Подготовьте ребусы на любые темы и добавьте их в проект. Создайте соответствующие слайды «Информатика» и «Ребусы», пользовательские формы и программные коды.
Примечание: Мы стараемся как можно оперативнее обеспечивать вас актуальными справочными материалами на вашем языке. Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Просим вас уделить пару секунд и сообщить, помогла ли она вам, с помощью кнопок внизу страницы. Для удобства также приводим ссылку на оригинал (на английском языке).
Средство, используемое для автоматизации часто используемых задач, недоступно в PowerPoint_2013 или более поздней версии. Вместо этого для создания или изменения макросов можно использовать Visual Basic для приложений (VBA). Сюда входят изменения, которые были созданы в более ранних версиях PowerPoint_generic.
Создание и изменение макроса
Чтобы создать или изменить макрос с помощью Visual Basic для приложений, сделайте следующее:
На вкладке Вид выберите Макросы.
В диалоговом окне Макрос введите имя макроса.
В списке Где выберите TE000127621 или презентацию, где требуется сохранить макрос.
В поле Описание введите описание макроса.
Чтобы открыть Visual Basic для приложений, нажмите кнопку Создать.
Важно: Это средство недоступно в Office на компьютерах под управлением Windows RT. Хотите узнать, какая у вас версия Office?
Запуск макроса
Сведения о том, как запустить макрос в последних версиях PowerPoint_generic, можно найти в разделе Запуск макроса в PowerPoint.
Экономия 5 минут в час за счет более продуктивной работы дает за год экономию в 4 рабочие недели
VBA в PowerPoint
Зачем нужны макросы в PowerPoint?
Начну с того, что задачи для программирования в PowerPoint достаточно специфические, в большинстве случаев они решаются через Excel. Однако, ряд задач решить таким образом не удастся. Например:
- Добавить на каждый слайд презентации progressbar с показом оставшегося количества слайдов
- Убрать весь alternative text, заголовки и гиперссылки с каждой формы и рисунка
- Автоматически рисовать фигуру по заданным параметрам, например, для перехода в определенное место презентации
- Создать умное оглавление
- Сделать вышеперечисленное для всех презентаций в папке (пользуясь случаем – передаю привет трудягам, у кого их больше 30 на периодическом обновлении)
Как создавать макросы?
Если вы привыкли создавать и запуска макросы из файла с поддержкой макросов – здесь все без изменений. Привычным нажатием на Alt + F11 (или с вкладки Разработчик на ленте) заходите в VBE, добавляете модуль и вставляете код макроса. Запустить код можно по кнопке Run или по нажатию на F5.
Все становится сложнее, как только вы решаете выполнять код макроса достаточно часто. В Excel для этих целей используются надстройки и кнопки на панели быстрого доступа.
В PowerPoint привычные действия такого результата не дадут. Даже если вы сохраните вашу презентацию с поддержкой макросов и написанным кодом как надстройку, подключите ее, то вы не сможете запускать макросы. Честное слово, можете попробовать самостоятельно. Я раз 5 попробовал прежде, чем смотреть в интернете в чем же все-таки дело.
А проблема в том, что по умолчанию в PowerPoint вы не можете даже открыть на чтение код макросов в надстройках . Поэтому идем дальше:
Прописываем в регистре Windows возможность редактирования надстроек
Слава богу не мы одни таким вопросом задавались, поэтому есть готовый рецепт
- Нажмите на клавиши Win + R
- В появившемся окне вводим regedit
- Идем в папку HKEY_CURRENT_USERSoftwareMicrosoftOffice14.0PowerPointOptions
(12.0 для Office 2007, 14.0 для Office 2010, 15.0 для Office 2013, 16.0 для Office 2016) - Щелкаем в правом окне правой кнопкой мыши –> New -> DWORD
- Имя = DebugAddins, значение = 1
Перезапустите PowerPoint – теперь вы сможете видеть в среде VBE код макросов из надстроек.
**Как добавлять/Убирать макросы из надстройки PowerPoint **
В Excel вы редактируете код макросов надстроек, сохраняете изменения и можете быть уверены в том, что перезапуске приложения надстройка предстанет перед вами в обновленном виде.
А вот в PowerPoint это не так. Не знаю точно из-за чего сделано это ограничения, но кнопка сохранить не производит никаких изменений в вашу надстройку.
Поэтому моя рекомендация – всегда хранить у себя копию надстройки в виде презентации с поддержкой макросов. Если нужно внести изменения в надстройку, то:
- Идем в презентацию с поддержкой макросов
- Вносим изменения в код макросов. Сохраняем изменения в презентации
- В параметрах PowerPoint отключаем подключенную надстройку
- Сохраняем презентацию с поддержкой макросов как надстройку с перезаписью
- В параметрах PowerPoint подключаем надстройку
Непростые манипуляции по сравнению с Excel, да?
Проблема с панелью быстрого доступа
Для тех, кто также как и я, любит добавлять кнопки на панель быстрого доступа:
В PowerPoint делать этого нельзя, равно как и добавить кнопки на ленту. Если быть совсем точным, сделать это возможно, но делать это придется через специальную надстройку в Excel. В ней можно дорисовать нужные вкладки.
Для себя я остановился на запуске макросов из VBE по кнопке F5.
Если вы все еще не передумали насчет макросов в PowerPoint, то:
Ресурсы по VBA в PowerPoint
Как вы, наверное, догадались – литературы по VBA в PowerPoint как таковой нет. По крайней мере, я не нашел – если поделитесь ссылкой буду рад.
Со статьями на английском языке немного попроще – для себя нашел весьма полезными ресурсы