Как записать макрос в powerpoint

Обновлено: 25.11.2022

Данный материал основан и доработан по материалам оригинальной статьи "EasyTweaks - How to create and add slides to PowerPoint presentations with VBA".

Существует ли способ автоматизировать создание презентаций PowerPoint с нуля с последующим быстрым добавлением слайдов к существующей презентации? Мы подумали, что данную задачу для PowerPoint вполне под силу решить с помощью макросов. Однако, как известно, PowerPoint не включает средство записи макросов Macro Recorder (в отличие от Excel и Word, которые имеют встроенные средства записи макросов). Поэтому у нас остаётся лишь старый добрый Visual Basic for Application (VBA), который мы можем использовать для создания простых макросов для автоматизации PowerPoint. Разумеется, существуют и альтернативные варианты автоматизации PowerPoint, но они выходят за рамки данной статьи.

В этом кратком руководстве мы рассмотрим три различных варианта использования:

  • Создание новой презентации (пустой или по шаблону);
  • Добавление слайдов к существующей презентации;
  • Сочетание двух предыдущих вариантов.

Создайте презентацию PowerPoint и сохраните ее с возможностью выполнения макросов (файл с расширением *.pptm).

PowerPoint save as pptm

Посмотрите на Ленту (Ribbon). Если в Ленте нет вкладки "Разработчик" (Developer), то перед началом написания кода необходимо включить эту вкладку (меню ленты File - Options).

PowePoint add Developer Tab in Ribbon

Далее во вкладке Trust Center, включите возможность выполнения макросов в PowerPoint.

Trust Center for VBA in PowerPoint Options

После того, как вы сделаете вкладку "Разработчик" (Developer) видимой для вашей ленты, перейдите на эту вкладку и нажмите кнопку Visual Basic (или просто нажмите Alt + F11), чтобы открыть Visual Basic IDE.

Run Visual Basic Editor from PowerPoint

Макрос VBA для создания презентации и добавления слайдов

В редакторе Visual Basic щелкните правой кнопкой мыши VBAProject и выберете пункт вставки модуля (Insert > Module).

Insert Module in VBA for PowerPoint

Вставьте следующий код во вновь созданный модуль:

Нажмите в меню File, а затем Save… При сохранении следует выбрать формат с поддержкой макросов (*.pptm):

Save presentation as pptm

Чтобы запустить код, нажмите Run, а затем выберите Run Sub/UserForm (или просто F5).

Run Sub/UserForm in VBA

В итоге мы увидим созданный и открытый файл презентации.

Create new presentation from VBA

Теперь редактор Visual Basic можно закрыть.

Как создавать и вставлять Фигуры (Shapes) в PowerPoint с помощью VBA

Захотелось автоматизировать довольно обыденную задачу по созданию слайдов PowerPoint. При автоматизации PowerPoint вы обычно работаете с коллекцией слайдов и фигур. Слайды говорят сами за себя, а фигуры - это почти все остальное, включая текстовые поля, кнопки действий, медиа-объекты, метки, изображения, выноски, блок-схемы и т.д.. Хотя мы будем демонстрировать приемы работы с PowerPoint, часть синтаксиса на самом деле вполне применима к Microsoft Word и Excel.

Приступим к работе с фигурами. Во-первых, давайте продолжим и откроем редактор VBA, нажав Alt + F11. Если вы следовали предыдущему руководству, у вас должен быть Module1 в вашем списке модулей.

Добавление текстового поля через VBA

Начнем с добавления вертикального текстового поля к нашему первому слайду презентации. Добавьте следующий код в Module1 , затем нажмите кнопку Сохранить (Ctrl + S) и запустите макрос (пункт меню Run Sub/User Form или просто нажмите F5).

Add text shape

Обратите внимание, что вы можете довольно легко изменить размер текстового поля с помощью VBA. В этом случае мы изменим размер первой фигуры на втором слайде, свободно меняйте код при необходимости.

Resize text shape

Текстовые эффекты PowerPoint с VBA

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

Посмотрим, что получилось:

Add text effect in shape

Обратите внимание, что вы можете использовать простой водяной знак для достижения этого конкретного результата.

Выноски PowerPoint с VBA

В нашем следующем примере мы добавим выноску ко второму слайду презентации.

Add Callout in Shape

Создание презентации PowerPoint из книги Excel

Рассмотрим ещё один случай, когда вы хотите создать презентацию PowerPoint прямо из электронной таблицы Excel. Вы можете использовать аналогичный метод в Word и других приложениях Microsoft Office.

Данный пример демонстрирует возможность вызова другого приложения MS Office из первоначально запущенного приложения (прим. пер.).

Сперва создайте новую книгу Excel и сохраните ее как книгу с макросами (файл с расширением *.xlsm).

Save file as xlsm

Войдите в редактор Visual Basic Editor (меню ленты Developer > Visual Basic, либо сочетанием клавиш Alt+F11)

Open VBE from Excel

В редакторе VBE свяжите электронную таблицу с моделью данных PowerPoint, выбрав в меню (Tools > References), Microsoft PowerPoint Object Library.

References in VBA

Add Microsoft PowerPoint Object Library

Вставьте новый модуль VBA для внесения кода процедуры Visual Basic.

Insert Module in VBA for Excel

Вставьте приведенный ниже код VBA непосредственно в модуль VBA и нажмите иконку Save.

(При необходимости, вы можете внести свои изменения в сценарий.)

Module code in VBA

Вставьте кнопку прямо в электронную таблицу Excel (меню Developer > Insert, а затем выберите Button (Form Control)).

Insert Button control in Excel

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

А теперь разберем процесс создания подобного теста. Он будет разбит на три этапа:

  • Создание макросов для автоматизации;
  • Подготовка исходных слайдов;
  • Настройка работы слайдшоу

Создание макросов для автоматизации

Для начала нам нужно включить вкладку «Разработчик». Можно обойтись и без нее, но раз уж мы работаем с макросами, то будем действовать по канонам. Переходи в «Файл» — «Параметры» — «Настройка ленты» и ставим галочку напротив «Разработчик«.

как сделать макросы в презентации powerpoint

Теперь перейдем на появившуюся на ленте вкладку и откроем окно редактора Visual Basic (можно сделать это сочетанием клавиш Alt+F11). В редакторе нам нужно будет добавить к нашей презентации новый модуль. Для этого кликните правой кнопкой мыши по нужной презентации в окне слева, выберите «Insert» — «Module«. В правой части появится белое окно модуля. Сюда мы и будем вводить весь наш код.

На этом этапе можно сохранить презентацию (хоть она пока и пустая). Главное, что нужно сделать — указать при сохранении формат Презентация PowerPoint с поддержкой макросов. В ином случае, введенный впоследствии код просто не будет сохранен. Итак, в нашей презентации будут:

Для объявления этих переменных введите в модуль код:

как сделать макросы в презентации powerpoint

Кстати, весь зеленый текст (ему всегда предшествует апостроф) вводить не обязательно. Это просто комментарии для понимания работы кода.

Для автоматизации будут использованы следующие макросы:

как сделать макросы в презентации powerpoint

2) ExitTest. Этот макрос будет завершать тестирование и выходить из режима слайд-шоу.

как сделать макросы в презентации powerpoint

как сделать макросы в презентации powerpoint

как сделать макросы в презентации powerpoint

как сделать макросы в презентации powerpoint

как сделать макросы в презентации powerpoint

как сделать макросы в презентации powerpoint

Ну вот и всё. Самое сложное позади. Введен весь нужный код, теперь можно приступить к созданию самих слайдов.

Подготовка исходных слайдов

Выберите подходящий на Ваш взгляд макет («Файл» — «Создать«) и приступайте к созданию. На титульном слайде разместите заголовок с названием теста и кнопку для запуска тестирования. Это может быть любая фигура с текстом, картинка или просто надпись. Всё на ваше усмотрение. В нашем примере кнопка состоит из 3 частей:

  • Прямоугольник (сама кнопка);
  • Надпись «Начать тестирование»;
  • Логотип Excel.

Теперь кликните на прямоугольник кнопки и выберите «Вставка» — «Действие«. На вкладке «Щелчок мышью» выберите «Запуск макроса» и укажите из списка макрос Start. Теперь в режиме слайдшоу при клике на прямоугольник будет запускаться макрос Start, а это, как мы помним, макрос начала тестирования.

как сделать макросы в презентации powerpoint

Чтобы прямоугольник, надпись и картинка стали единым объектом (и удобнее перемещались, изменялись в размерах и т.д.), нужно сгруппировать элементы. Выделите мышкой все объекты, а затем кликните на выделенных объектах правой кнопкой мыши и выберите «Группировать» — «Группировать«.

Слайды с вопросами

В верхней части пишем номер вопроса. Под ним — сам вопрос. Ниже добавляем четыре прямоугольника одинакового цвета и размера, аккуратно размещаем их и в каждом вводим варианты ответа. Для ввода текста в прямоугольник, просто выделите его и начинайте печатать. Затем, не снимая выделения с прямоугольника, можете изменить цвет и размер шрифта, выбрать другую гарнитуру и применить иные настройки. Получится что-то вроде этого:

как сделать макросы в презентации powerpoint

Теперь нужно включить отображение области выделения объектов. На вкладке «Главная» выберите «Выделить» — «Область выделения«.

как сделать макросы в презентации powerpoint

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

как сделать макросы в презентации powerpoint

Теперь нужно к слайду с правильным ответом подключить макрос Corr, а ко всем остальным — макрос Wrong, как мы делали это выше с макросом Start. Запомните, в каком именно прямоугольнике введен верный ответ (в нашем случае — в левом нижнем).

Когда слайд готов, его нужно продублировать столько раз, сколько у вас будет вопросов. Чтобы сделать копию слайда, кликните на нем в левой части окна в списке слайдов и нажмите Ctrl+D нужное количество раз.

О том, что вопросы кончились, будет оповещать вот такой слайд.




как сделать макросы в презентации powerpoint

Как Вы догадались, на прямоугольник с надписью «Посмотреть результат» назначен макрос Result.

Слайд с результатами

Слайд результатов мы оформили вот так:

как сделать макросы в презентации powerpoint

Вы можете оформить так, как считаете нужным, но чтобы слайд был обновляемым, нужно обязательно сделать следующее:

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

Настройка работы слайдшоу

Осталось немного. Теперь нужно настроить слайд-шоу так, чтобы тестируемый не мог переключаться на предыдущие слайды, менять ответы и т.д. Для этого кликаем на любой слайд и идём на вкладку «Переходы«. Там ставим вот такие настройки и нажимаем «Применить ко всем«.

как сделать макросы в презентации powerpoint

Затем идем на вкладку «Слайд-шоу» и выбираем «Настройка слайд-шоу«.

как сделать макросы в презентации powerpoint

Выбираем вариант показа «Автоматический (полный экран)»

как сделать макросы в презентации powerpoint

Теперь у пользователя нет возможности перейти между слайдами, кроме как ответив на заданный вопрос. Выйти из презентации он также может только нажав клавишу Esc. Если хотите лишить его и этой возможности — отберите клавиатуру. Всё равно для теста нужна только мышь 😉

Запускается тест при старте демонстрации (клавиша F5). Файл-пример из этого урока качайте по ссылке. После открытия файла не забудьте разрешить запуск макросов.

как сделать макросы в презентации powerpoint

Вот так на практическом примере мы разобрали сразу несколько полезных приемов работы в Power Point и VBA. Надеемся, Вы нашли для себя что-то полезное.

Поддержать наш проект и его дальнейшее развитие можно вот здесь.

Ваши вопросы по статье можете задавать через нашего бота обратной связи в Telegram: @KillOfBot

Макро записи является отличным способом , чтобы записать шаги в PowerPoint и других программ Microsoft Office. К сожалению, PowerPoint 2010 не имеет Macro Recorder (по какой-либо причине команда за PowerPoint решила удалить эту функцию из PowerPoint 2010 и 2013) и писать код VBA является единственным способом для создания макросов.

Если у вас есть доступ к предыдущей версии PowerPoint , таких как PowerPoint 2003 или PowerPoint 2007, то вы можете открыть презентацию здесь и записи макросов с помощью макросов инструмент Record. Затем сохраните изменения и откройте его в PowerPoint 2010, и вы будете иметь возможность редактировать макросы, которые были записаны или написанные в более ранних версиях PowerPoint. Для редактирования макросов вы можете перейти к в редакторе Visual Basic в PowerPoint 2010.

Связанный: Запуск VBA код при запуске презентации

Урок 2. Использование макроса Drag&Drop (Х. Хофман) в презентации с паззламиСалтанат Салиш

Урок разработан в рамках МК «Технологический прием «Паззлы» Ссылка на скачивание шаблона презентации с…

Word для начинающих. Урок 25: Создание и использование макросовДмитрий Кивганов

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

Урок по Powerpoint. Создание вкладокМаксим Семенихин

Урок №2. Создание вкладок в презентации. Создание нестандартных презентаций PowerPoint.

Как написать макрос в Excel — создание и запись VBA макросов в Excel 2013/2016. Урок 3Skill.im — качественные видеокурсы

Чирков Марк 6522 Макросы Excel, Word, Power PointMark Chirkov

О чем это видео: Microsoft Office.

Запись макроса в Microsoft Office Excel 2010 (27/50)TeachVideo

Работа с макросами. Включение и отключение макросов. Использование уровней безопасности в Word 2013.TeachVideo

Пройти тест по теме: goo.gl/KSCX9t Домашнее задание от Домашней Школы InternetUrok: goo.gl/r8cUgd Задать вопрос к…

MS Word коротко о макросах и о том как они могут облегчить жизньVigil IT-video

В этом видео я решил немного рассказать о такой замечательной вещи как макросы. Опытным пользователям и…

Макроси. Створення макросів та їх використанняРечиц Евгений

Инструкция по созданию тестаNatal Bath

Данная инструкция представляет создание компьютерного теста в PowerPoint с использованием языка VBA.

Запис простого макросу в WordВиталий Бараболиков

Створення і використання макросів в Word для автоматизації роботи з текстом і виконання однотипних дій.

EXCEL 2010 Запись макроса.MrAstambur

Урок №5 Вставка SmartArt и WordArt в программе PowerPointАлла Госсман

Урок №5 Вставка SmartArt и WordArt в программе PowerPoint.

100 Запуск макроса из макроса в AccessСИЛА ЗНАНИЯ

MS Power Point онлайн тест тузобузWELL KG

Как сделать тест онлайн с помощью ms power point.

Как сохранить презентацию PowerPoint в видеоКомпьютерная Грамота

Видеоинструкция о том, как сохранить PowerPoint-презентацию в видео формате и при необходимости дополнить ее…

Макросы9070695

Презентация МакросыПопов Дмитрий

Макрос для Word (Иванов 6522)Иван Иванов

Создание макроса в вордСергей Каюров

Макрос для удаления ссылок на КонсультантПлюсНаталья Усольская

Макрос Microsoft Word для удаления ссылок, остающихся после копирования текста из системы КонсультантПлюс (как…

0001 Что такое макросы MS WordАндрей Поляков

Поменять местами фотографии на слайдеИван Иванов

С помощью макроса легко обновить фотографии, рисунки на слайде одним нажатием кнопки.

Как сделать презентацию PowerPoint.

Кудинов 6522 — макросы,гугл таблицы,документы,сайт итдAlexey Kudinov

00:00 — Google Документ 03:59 — Google Таблица 05:21 — Google форма 07:11 — Google Скрипт 08:08 — Макрос Excel 09:28 — Макрос Word 10:27 — Макрос…

МК 1. Урок 3. Как создать слайд-шоу в Power PointСалтанат Салиш

Секреты Excel: макросы, кнопки, переменныеSpecialistTV

Хотите узнать об Excel то, о чем не подозревают не только новички, но и зачастую продвинутые пользователи?…

Макросы,сайт итд. Домашина Анастасия 6522Alexey Kudinov

00:00 — Дополнения Google документы,таблицы,формы 07:35 — Google script 09:56 — google сайт 17:51 — макросы excel, word, powerpoint.

Подпишись на канал! До 1000 подписчиков осталось совсем немного 🙂 В видео рассмотрим, как сделать слайд шоу…

ЗАНЯТИЕ 2 СОЗДАНИЕ ПРЕЗЕНТАЦИЙ В POWERPOINT. Презентацияmsofficeprowork

Записанная в режиме показа презентация к занятию 2 курса Само занятие и скачать презентацию можно по адресу…

Диаграммы в Excel, создание диаграммы с помощью макросаIvan Karpov

создание презентации в powerpointwin7ka

Привет всем кто хочет научиться работать в программе по созданию презентаций powe rpoint. В этом уроке я покажу…

Урок по PowerPoint 2013 | Первые шаги в PowerPoint 2013 | PowerPoint 2013 Для начинающихВладимир Тимоненков: ПРЕДСТАВЛЯЕТ

MS Powerpoint — Macro/VBA Code Basic Samples TutorialSuperNikestar

Макросы в QlikView Изменение цвета ярлыка с помощью VB макросаQlikView и Qlik Sense учебные материалы, готовые решения, обучение

How to create Macros in MIcrosoft Powerpoint 2010Ernie Drumm

This video is going to show you how to create dialogue boxes in Microsoft PowerPoint 2010.

Introduction to Macro Programming In Microsoft PowerPoint 2010 — Addition of Two NumbersKarthik Dakshinamurthi

How to enable the Developer Tab, How to enable Macro, How to create a Macro, How to Run a Macro, How to add a micro in Ribbon.

Microsoft Excel для Начинающих (Часть 5)Андрей Сухов

Подробный курс по Word, Excel и Powerpoint — goo.gl/hZwKzq В пятом видеоуроке по основам программы Microsoft Excel мы окончател…

MS Excel — Ввод формулВячеслав Карасиков

В этом уроке показывается простой способ записи формул в Excel так, чтоб не запутаться в скобках.

Tutorial 2 — Assign Macro to a ShapeL Fell

This will allow you to assign a Macro to a shape in Microsoft Powerpoint. The user will be able to click the shape to enter the username before completing your …

VBA для Excel (фрагмент онлайн-урока). Тема: Объявление переменных. Типы переменныхУчебный центр Бейсик

Фрагмент онлайн урока по курсу «Основы программирования Visual Basic for Applications (VBA) для Excel. Уровень 1.» Тема «Объявле…

Microsoft Excel для Начинающих (Часть 9)Андрей Сухов

Подробный курс по Word, Excel и Powerpoint — goo.gl/hZwKzq В заключительном девятом уроке по основам программы Microsoft…

Word Exsel Power Point👆Как активировать❓С компьютером на Ты

Активатор ВРЕМЕННО НЕ АКТУАЛЕН. ОЖИДАЙТЕ ОБНОВЛЕНИЯ Компьютерные Знания goo.gl/SkhbRc Размещение …

(Promo) Unlock Excel VBA and Excel Macros Course — Now availableLeila Gharani

Link to complete course ▻ bit.ly/LeilaVBA This is the promo video for my online Excel VBA & Macros course which will take you from beginner, all the way …

Организация интерфейса. Новое в Microsoft Office Word 2013. Настройка учетной записиTeachVideo

Сбой активации продукта. Активируем MS Office. Активатор Windows | Office скачать АктивацияВидеоуроки по информатике

Урок № 4 Создание презентаций в программе PowerPoint2013. ДиаграммыЗаработок в интернете для начинающих

Из видеоурока Вы узнаете, как добавлять диаграммы в презентацию в программе PowerPoint2013 Клуб Offerinvest — пассивный…

065. Ms Power Point. Урок 65. ТаблицыАлександр Бурков

Создадим тест в powerpoint с помощью VB. Для этого откроем новую презентацию или любую созданную, котую хотим дополнить тестом.

1 способ: выбор ответа нажатием кнопки.

Вопрос с выбором ответа

Прописывае номер вопроса по желанию. Прописываете в обычном режиме вопрос. Добавляем «переключатели» с помощью которых будут выбирать правильные ответы. Как и в примере с кнопками, прописываем переключатели. Добавим еще кнопку, с помощью которой примем ответ, его обработаем и переходим на новый слайд.

значение переключателей обнуляется, чтобы слайд был чист при возврате. Чтобы посчитать отвеченные вопросы увеличиваем n на единицу. Переходим на новый слайд.

Вопрос с вводом ответа. Прописывае номер вопроса по желанию. Прописываете в обычном режиме вопрос. Добавляем «Поле» для ввода ответа. Добавим еще кнопку, с помощью которой примем ответ, его обработаем и переходим на новый слайд.

Двойным щелчком по кнопке ввода ответа открываем форму VB. Прописываем обработку введенного ответа:

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

If CheckBox1.Value = True And CheckBox2.Value = False And CheckBox3.Value = True And CheckBox4.Value = False Then k = k + 1 Else MsgBox «неверно»

В разделе PowerPoint

PowerPoint: Сохранение очков при создании викторины в PowerPoint

PowerPoint часто используют для создания разного рода тестов и викторин. Однако слабым местом всех таких тестов является тот факт, что PowerPoint «не умеет» подсчитывать очки, «забывая», какой выбор сделал студент на предыдущем слайде. Однако стоит вспомнить, что все программы из пакета Microsoft Office работают в связке с мощнейшим Visual Basic for Applications, возможности которого вполне можно использовать и для подсчета очков в викторине. При этом при грамотном подходе вам совсем не обязательно вникать во все премудрости написания программ на Visual Basic — просто воспринимайте код, который вы увидите на этой странице за «черный ящик» и выполняйте инструкции. Из программирования нужно знать только, что для каждого важного для вашего сценария события, такого, как щелчок мышкой по ответу, нужно создать процедуру. В Visual Basic процедура всегда начинается со слов Sub Name() и заканчивается End Sub

У вас все получится!

В принципе, процесс состоит из двух шагов:

1. Вы должны присвоить конкретные имена всем объектам на слайдах, поскольку только так вы сможете получить доступ к этим объектам с помощью кода, который будет посылать инструкцию изменить текст объекта или иные его параметры.

Один из наших других статусом MVP (Shyam) имеет все виды отличные образцы VBA и надстройки, которые помогут вам, когда вы готовы вникать в VBA. Сайт ссылка:

Вот простой макрос, который позволяет переименовать все объекты:

В PowerPoint создайте новый макрос (на вкладке «Вид» нажимаете кнопку «макросы», пишете имя нового макроса (можно написать любое — его потом заменим) и нажимаете «создать»:

как сделать тест в презентации powerpoint с подсчетом баллов

В открывшемся окне VBA просто заменяете текст, который там был на код, напечатанный выше.

2. Следующим важным моментом является создание переменных, в которых будут сохраняться значения, которые вы хотите использовать для оценивания действий игрока. Соответственно, если у вас есть три игрока, переменных также должно быть три:

Переменные объявляются при помощи ключевого слова Dim и записываются эти инструкции ДО начала всех процедур.

3. Третьим важным моментом является создание в презентации макроса, который добавляет заработанные очки в требуемую переменную. Что-то вроде такого:

4. Теперь необходимо вывести суммарное количество очков, которое заработал данный игрок. Напомню, что очки первого игрока хранятся в переменной intScore1. Например, если вы создали прямоугольник в качестве «экрана» для подсчета очков для данного игрока на слайде 3, и назвали его Player1Score (это легко сделать при помощи макроса NameShape), то для того, чтобы вывести в нем количество очков, которое хранится в переменной intScore1, нужно написать примерно такой код:

5. Теперь осталось объединить все, что мы описали. Вначале я объявил переменную (клчевое слово Dim). Она должна быть видимой всем процедурам, чтобы на каждом слайде мы могли добавлять (или убавлять очки. Поэтому она записана в первой строке, еще до того, как начинается описание всех процедур.

Затем идет простенькая процедура, которая должна сработать, когда игрок выбирает правильный ответ. При этом в объекте по имени Player1Score на слайде №3 количество очков увеличится на 100. Вторая процедура аналогично при неправильном ответе уменьшает количество очков на 100.

intScore1 = intScore1 + 100




intScore1 = intScore1 — 100

Power PointPower Point 2007PowerPoint

Power Point, Power Point 2007

А теперь разберем процесс создания подобного теста. Он будет разбит на три этапа:

  • Создание макросов для автоматизации;
  • Подготовка исходных слайдов;
  • Настройка работы слайдшоу

Создание макросов для автоматизации

Для начала нам нужно включить вкладку «Разработчик». Можно обойтись и без нее, но раз уж мы работаем с макросами, то будем действовать по канонам. Переходи в «Файл» — «Параметры» — «Настройка ленты» и ставим галочку напротив «Разработчик«.

как сделать тест в презентации powerpoint с подсчетом баллов

Теперь перейдем на появившуюся на ленте вкладку и откроем окно редактора Visual Basic (можно сделать это сочетанием клавиш Alt+F11). В редакторе нам нужно будет добавить к нашей презентации новый модуль. Для этого кликните правой кнопкой мыши по нужной презентации в окне слева, выберите «Insert» — «Module«. В правой части появится белое окно модуля. Сюда мы и будем вводить весь наш код.

На этом этапе можно сохранить презентацию (хоть она пока и пустая). Главное, что нужно сделать — указать при сохранении формат Презентация PowerPoint с поддержкой макросов. В ином случае, введенный впоследствии код просто не будет сохранен. Итак, в нашей презентации будут:

Для объявления этих переменных введите в модуль код:

как сделать тест в презентации powerpoint с подсчетом баллов

Кстати, весь зеленый текст (ему всегда предшествует апостроф) вводить не обязательно. Это просто комментарии для понимания работы кода.

Для автоматизации будут использованы следующие макросы:

как сделать тест в презентации powerpoint с подсчетом баллов

2) ExitTest. Этот макрос будет завершать тестирование и выходить из режима слайд-шоу.

Ну вот и всё. Самое сложное позади. Введен весь нужный код, теперь можно приступить к созданию самих слайдов.

Подготовка исходных слайдов

Титульный слайд

Выберите подходящий на Ваш взгляд макет («Файл» — «Создать«) и приступайте к созданию. На титульном слайде разместите заголовок с названием теста и кнопку для запуска тестирования. Это может быть любая фигура с текстом, картинка или просто надпись. Всё на ваше усмотрение. В нашем примере кнопка состоит из 3 частей:

  • Прямоугольник (сама кнопка);
  • Надпись «Начать тестирование»;
  • Логотип Excel.

Теперь кликните на прямоугольник кнопки и выберите «Вставка» — «Действие«. На вкладке «Щелчок мышью» выберите «Запуск макроса» и укажите из списка макрос Start. Теперь в режиме слайдшоу при клике на прямоугольник будет запускаться макрос Start, а это, как мы помним, макрос начала тестирования.

Чтобы прямоугольник, надпись и картинка стали единым объектом (и удобнее перемещались, изменялись в размерах и т.д.), нужно сгруппировать элементы. Выделите мышкой все объекты, а затем кликните на выделенных объектах правой кнопкой мыши и выберите «Группировать» — «Группировать«.

Слайды с вопросами

В верхней части пишем номер вопроса. Под ним — сам вопрос. Ниже добавляем четыре прямоугольника одинакового цвета и размера, аккуратно размещаем их и в каждом вводим варианты ответа. Для ввода текста в прямоугольник, просто выделите его и начинайте печатать. Затем, не снимая выделения с прямоугольника, можете изменить цвет и размер шрифта, выбрать другую гарнитуру и применить иные настройки. Получится что-то вроде этого:

Теперь нужно включить отображение области выделения объектов. На вкладке «Главная» выберите «Выделить» — «Область выделения«.

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

Теперь нужно к слайду с правильным ответом подключить макрос Corr, а ко всем остальным — макрос Wrong, как мы делали это выше с макросом Start. Запомните, в каком именно прямоугольнике введен верный ответ (в нашем случае — в левом нижнем).

Когда слайд готов, его нужно продублировать столько раз, сколько у вас будет вопросов. Чтобы сделать копию слайда, кликните на нем в левой части окна в списке слайдов и нажмите Ctrl+D нужное количество раз.

О том, что вопросы кончились, будет оповещать вот такой слайд.

Как Вы догадались, на прямоугольник с надписью «Посмотреть результат» назначен макрос Result.

Слайд с результатами

Слайд результатов мы оформили вот так:

Вы можете оформить так, как считаете нужным, но чтобы слайд был обновляемым, нужно обязательно сделать следующее:

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

Настройка работы слайдшоу

Осталось немного. Теперь нужно настроить слайд-шоу так, чтобы тестируемый не мог переключаться на предыдущие слайды, менять ответы и т.д. Для этого кликаем на любой слайд и идём на вкладку «Переходы«. Там ставим вот такие настройки и нажимаем «Применить ко всем«.

Затем идем на вкладку «Слайд-шоу» и выбираем «Настройка слайд-шоу«.

Выбираем вариант показа «Автоматический (полный экран)»

Теперь у пользователя нет возможности перейти между слайдами, кроме как ответив на заданный вопрос. Выйти из презентации он также может только нажав клавишу Esc. Если хотите лишить его и этой возможности — отберите клавиатуру. Всё равно для теста нужна только мышь 😉

Запускается тест при старте демонстрации (клавиша F5). Файл-пример из этого урока качайте по ссылке. После открытия файла не забудьте разрешить запуск макросов.

Вот так на практическом примере мы разобрали сразу несколько полезных приемов работы в Power Point и VBA. Надеемся, Вы нашли для себя что-то полезное.

Поддержать наш проект и его дальнейшее развитие можно вот здесь.

Ваши вопросы по статье можете задавать через нашего бота обратной связи в Telegram: @KillOfBot

20 марта 2014 Автор: Бакытжан

Если нажмете на кнопку ВЫБЕРИ СЕБЯ, то появится список учеников и ученик выберет себя. Предусмотрено три уровня. Если какой — то уровень не нужен, его можно удалить. На первом слайде написано, что нельзя удалять. Можно составлять тесты трех видов: такой,

с выбором одного правильного ответа, который записывается в прямоугольник со словом ДА, а в прямоугольники со словом НЕТ вписываются неправильные ответы; еще такой

Нажимаем и попадаем в такое окошечко. Находим в списке wrk_start_L1. Нажимаем на него. Затем Изменить.

В таком окне мы должны сделать два исправления. Помните мы договорились, что первый уровень начинается с третьего слайда и заканчивается двадцатым. Так вот, в красные кружочки надо эти цифры написать: num=3 , cnt=20 .

Сохраняем изменения. Для этого жмем на кнопку в красном квадратике.

Точно также изменяем цифры для второго и третьего уровней. Теперь разберемся давайте с выставлением оценок. Открываем Макрос и нажимаем wrk_otmetka. И Изменить.

Мы делаем замечательный тест на PowerPoint. Не забыли еще. Я, к примеру, придерживаюсь такого распределения процентов: больше или равно 90 % — это пятерка; больше или равно 75% — это четверка; больше или равно 50% — это тройка. У вас может быть своя система процентов. Проставьте их здесь в цветных прямоугольниках.

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

Вы попадете на страницу изменения макроса. Только здесь делать придется немножко по другому. Появится слева вот такое окошко. В нем нажмите на то место, которое я указал желтым.

Выберите там COR_ERR Textbox. Нажмите на него.

Теперь ниже отыскивайте в первой колоночке Text, Справа в той же строке вы увидите знакомый неправильный текст. Вставьте вместо этого текста свой неправильный текст. На всякий случай сохраните ваши изменения.

Затем выбираем COR_OK Textbox. Нажимаем на него.

Точно также ниже отыскивайте в первой колоночке Text, Справа в той же строке вы увидите исправленный текст шаблона. Вы вставьте вместо этого текста свой правильный текст. Сохраните ваши изменения.

Все! Замечательный тест на PowerPoint готов. Можно пользоваться тестом.

Рубрика: Интерактивные тесты, Статьи.
Метки: применение ИКТ, тесты на PowerPoint


Power Point - один из наиболее широко используемых инструментов Microsoft в мире. Это позволяет Creer легко красочные презентации , в нем есть множество шрифтов, клипарт и большое количество шаблоны, которые вы можете скачать и добавить в PowerPoint . Он также характеризуется своим оригинальные переходы и анимации которые делают презентации более динамичными.

В своих последних обновлениях Power Point уступил место добавление 3D изображений чтобы сделать презентации более качественными.

. макросы один из самых полезных инструментов PowerPoint потому что они могут очень легко помочь нам создавать или создавать презентации.

Что такое макросы?


Макрос - это Набор данных Microsoft , то есть последовательность шагов, которые сохраняются и могут быть активированы с помощью клавиши управления и буквы.

Для чего нужны макросы?

Его функция состоит в том, чтобы облегчить выполнение всех задач, требующих использования множества клавиш или команд, таких как создание нижнего колонтитула, изменение межстрочного интервала, создание заголовка или добавление отступов к абзацу.

Макросы доступны во многих инструментах Microsoft Office, таких как Excel, Power Point, OneNote, и вы может также создавать макросы в Word .

Шаги по созданию и запуску макроса в Power Point

Далее мы покажем вам, как создать и запустить макрос в Power Point. И напоминаем, что вы можете размещать анимацию и переходы на слайдах Power Point. Однако для создания макроса существует только один способ создать их с помощью Visual Basic для Приложения (VBA).


Шаг 1: перейдите на вкладку «Разработчик»

Нажмите кнопка "Офис" в левом углу окна. Затем нажмите «Параметры» Power Point.

Когда откроются параметры PowerPoint, выберите Категория «Популярные», затем установите флажок рядом с опцией «Показывать вкладки разработчика». Затем нажмите «ОК», и вкладка «Разработчик» уже должна быть видна.

Шаг 2: включите макросы

Power Point настроен так, что все макросы по умолчанию отключены, что позволяет избежать заражения вирусами. Однако если надежный источник выбран как макро, не о чем беспокоиться.

В любом случае вы можете использовать антивирус и сканировать файлы макросов, прежде чем запускать их, а затем, чтобы включить макросы, просто нажмите «Macro Security» на вкладке "Программист".

Шаг 3. Настройте параметры безопасности макросов

Как только вариант «Макробезопасность» был нажат , появится окно «Центр управления безопасностью». Вы должны убедиться, что выбрана опция «Настройки макроса».

Затем установите флажки рядом с ним из опционы «Активировать все макросы» и «Доверять доступ к объектной модели проекта VBA. » . По завершении нажмите «ОК».

Шаг 4. Сохраните как презентацию с поддержкой макросов

Затем вам нужно включить параметр «Power Point включен для макросов презентации» в раскрывающемся списке рядом с «Сохранить как тип». Cliquez-сюр- "Записывать".

Шаг 5: Назовите их и разместите коды

Откройте вкладку 'Разработчик' и нажмите кнопку «Макросы». Когда появятся макросы, пора дать им имя, затем вы должны нажать «Создать», когда закончите. Откроется окно «Редактор» Virtual Basic.

Все нужные вам команды выполнять или работа в макросе должна быть написана между командами «Sub» и «EndSub» . Помните, что вы можете вставлять макросы, уже созданные другими людьми, или создавать их самостоятельно.

Шаг 6. Назовите файл

Вы должны сначала написать кавычки, чтобы окружить имя пути к файлу, после того, как вы уже поместили желаемое имя, "HTLM" написано в конце, потому что он будет сохранен в этом формате.

Шаг 7. Готово и сохраняем.

После ввода ном du файл, нажмите "Ctrl + S" или вы можете нажать «Сохранить» в меню «Файл» на панели инструментов.

Мы надеемся на это учебник вы был полезен и что с помощью макросов вам будет намного проще создавать креативные слайды PowerPoint с профессиональным дизайном.


La Пакет Microsoft Office предлагает широкий выбор программ, которые сегодня незаменимы для различных задач. Эти приложения, в частности PowerPoint , имеют много функций. Одними из самых важных являются макросы. Что они собой представляют, для чего они нужны и как создать их в программе PowerPoint? Если вы хотите узнать больше, продолжайте читать.

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

Перед создать , вам нужно знать, для чего они используются, их преимущества и возможные уязвимости безопасности . В этой статье мы объясняем все по теме!

Что такое макросы в PowerPoint и для чего нужен этот инструмент?


Макрос - это функция, доступная в различных продуктах Microsoft Office. , например Word, Excel и PowerPoint . Однако что такое макросы и для чего нужен этот инструмент? Макросы можно описать как система автоматизации процессов .

Один макрос работает как регистратор , потому что он отвечает за воссоздание часто выполняемых пользователем задач с целью упростить работу и улучшить возможности программы . Таким образом, файлы PowerPoint содержат код для встраивания, который написан на языке программирования Визуальный Бейсик .

Каковы преимущества использования макросов в PowerPoint?


Запись макросов в программах Microsoft - одна из самых мощных функций пакета приложений. Однако широкой публике это в значительной степени неизвестно. По этой причине необходимо выделить преимущества использования макросов в PowerPoint . Главное преимущество использования Макрос , представляя собой экономия времени .

когда у тебя есть автоматизировал задачу , вам больше не нужно будет многократно нажимать клавиши или повторно взаимодействовать с мышью. Созданный макрос отвечает за автоматическое выполнение записанных шагов . Во-вторых, réduction замечательный ошибки можно упомянуть . Небрежность при создании презентации - обычное дело. Однако, записывая макросы, вы значительно уменьшить погрешность .

Регистратор выполняет все шаги, назначенные конкретной задаче. Наконец, использование Визуальный Бейсик создать Макрос Vous Permet D ' увеличить возможности приложения . Вы можете разрабатывать новые функции для Word , Excel et PowerPoint и поэтому используйте их при необходимости.

Макробезопасность Каковы основные риски, связанные с их использованием?

«ОБНОВЛЕНИЕ ✅ Хотите упростить и автоматизировать различные задачи в PowerPoint с помощью макроса? ⭐ ВОЙДИТЕ ЗДЕСЬ ⭐ и узнайте все о SCRATCH! »

Использование макросов в рутинных задачах позволяет значительно снизить рабочую нагрузку. Однако необходимо учитывать каковы основные риски, связанные с их использованием . По этой причине мы даем вам краткий обзор безопасность макросов и их уязвимости. Следует отметить, что нет никакого риска при создании макроса. Проблема возникает при запуске внешних макросов на вашем компьютере.

. нападавшие Информатика способны создавать вредоносные коды VBA , который можно интегрировать в документ Office. Каковы последствия запуска вредоносных макросов? Что ж, все дело в элементах управления. Есть команды, которые могут удалять файлы с диска , и они выполняются Макрос поврежден. Когда вы открываете документ, содержащий загрязненный макрос , он будет запускаться автоматически для всех будущих файлов.

Не только из PowerPoint, но также Excel и Слово, таким образом затрагивая все документы в системе. К счастью, последние версии Microsoft Офис есть раздел безопасность для защиты вашего компьютера от неизвестных макросов . Если макрос не имеет доверенного сертификата, он не сможет работать на компьютере.

Точно так же, Офисные приложения после 2013 года настроены так, что все Макрос являются отключен, таким образом избегая уязвимостей. Имейте в виду, что файлы, содержащие Макрос идентифицируются "М" в их соответствующих расширениях. Например: XLSM ( Excel ), DOCM ( Word ) И миллионных долей ( PowerPoint ). Таким образом, вы можете легко проверить, содержит ли полученный вами документ макро.

Пошаговые инструкции по созданию макроса в PowerPoint с нуля


. Макрос являются широко полезными инструментами при правильном использовании. Не все знакомы с такой функцией, поэтому мы предоставили руководство шаг за шагом, как создать макрос в PowerPoint с нуля . Следует учитывать, что версии после PowerPoint 2013 не имеет средства записи макросов . В этих случаях, чтобы создать или изменить его, вы должны запустить Visual Basic для приложений (VBA) .

Следующие шаги следующие:

  • Перейти на вкладку "Отображать". Затем нажмите кнопку Кнопка «Макро». Он расположен вверху справа.
  • Откроется новое диалоговое окно. Там вы должны введите имя макроса.
  • Внизу этого окна вы можете найти раскрывающееся меню с названием «Макро в». Щелкните это меню и выбрать модель или презентация, в которую вы хотите включить новый макрос. Наконец, добавьте описание в Поле «Описание».
  • Когда все поля будут заполнены, нажмите "Создавать" в диалоговом окне. Это сразу открывает окно Визуальный Бейсик .
  • Тогда вам нужно добавить программный код для VBA , в зависимости от задачи, которую вы хотите автоматизировать.
  • После ввода кода переходим во вкладку "Файлы" в Visual Basic и выберите «Закройте и вернитесь в Microsoft PowerPoint». Таким образом, макрос будет записан в вашу презентацию.

Позже он вам просто нужно добавить кнопку, запускающую макрос в документе. Вы также можете активируйте вкладку «Разработчик», выполнив щелкните правой кнопкой мыши на панели инструментов и выберите «Настроить ленту» . Таким образом, у вас будет более полное меню для работы с макросами, а также открыть Визуальный Бейсик . В Кнопка "Сохранить макросы" , вы можете назначить кнопку или клавишу для запуска только что созданного макроса. Наконец, просто нажмите "ХОРОШО" и макрос будет готов работать.

Если у вас есть какие-либо вопросы, оставляйте их в комментариях, мы свяжемся с вами как можно скорее, и это будет большим подспорьем для большего числа участников сообщества. Je Vous remercie!

Читайте также: