Записать метки времени смены слайдов во время презентации Powerpoint?

Question

Я планирую внедрить решение для захвата лекций. Одним из требований является запись как докладчика, так и слайд-шоу. Очевидно, что докладчик записывается с помощью видеокамеры, и слайд-шоу, вероятно, будет снято с помощью такого инструмента, как Camtasia.

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

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

Кто-нибудь здесь знает, как обнаружить изменения слайдов? Есть ли Powerpoint API, где я могу подключить обработчики событий или что-то в этом роде? Буду очень признателен за вашу помощь!

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

Answer 1

Вот код, который поможет вам в этом.

Сначала в PowerPoint VBE создайте класс, назовите его clsPPTEvents . Поместите следующее внутрь:

Public WithEvents PPTEvent As Application
Private Sub PPTEvent_SlideShowNextSlide(ByVal Wn As SlideShowWindow)
    MsgBox "Position: " & Wn.View.CurrentShowPosition & ", Time: " & Time
End Sub

Затем создайте модуль, назовите его как угодно и поместите в него следующее:

Public newPPTEvents As New clsPPTEvents
Sub StartEvents()
    Set newPPTEvents.PPTEvent = Application
End Sub
Sub EndEvents()
    Set newPPTEvents.PPTEvent = Nothing
End Sub

После запуска подпрограммы StartEvents вы можете перейти в режим презентации, и при каждом изменении слайда номер (позиция) и текущее время изменения будут отображаться в окне сообщения. Вы можете использовать эти (или другие) переменные для записи в файл. После выхода из запущенного слайд-шоу вы можете запустить EndEvents, чтобы остановить хук API.

Answer 2

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

Извините, что не предоставил элегантный ответ.