Как автоматически продвигать слайд PowerPoint после завершения анимации выхода?

Анимация входа в PowerPoint, настроенная с помощью «Начать: с предыдущим», запускается сразу при продвижении нового слайда. Однако, если вы настроите анимацию выхода таким же образом, она не начнется с последовательности завершения слайда. Вместо этого необходимо использовать триггер «Старт: по щелчку», и после завершения анимации выхода вам все равно потребуется один дополнительный щелчок, чтобы перейти к следующему слайду .

Обходной путь для этого очевиден: создайте дубликат слайда, сделайте конечную анимацию из исходного слайда вашей начальной анимацией на дублированном слайде и позвольте им следовать всем, что вы хотите, или создайте переходный слайд с этими только завершение анимации и настройте «Изменить продвижение слайда -> Автоматически после -> [время, необходимое для завершения анимации]».

Эти обходные пути заставят вашу аудиторию работать визуально. Однако это влияет на номера слайдов, которые вам, возможно, придется соответствующим образом отрегулировать и / или дублировать изменения содержимого. Если вы единственный, кто создает и использует свою презентацию, это может быть нормально. Но если вы создаете презентацию в режиме совместной работы с тремя другими людьми и даже не знаете, кто будет выступать в конце, вы можете все испортить.

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

Я написал сценарий VBA , который должен запускаться вместе с анимацией выхода и автоматически продвигать слайд через 0,3 секунды после завершения анимации выхода. Таким образом я избавлюсь от лишних кликов, которые необходимы прямо сейчас.

Sub nextslide()
iTime = 0.3
Start = Timer
While Timer < Start + iTime
DoEvents
Wend
With SlideShowWindows(1).View
    .GotoSlide (ActivePresentation.SlideShowWindow.View.Slide.SlideIndex + 1)
End With
End Sub

Хорошо работает, когда прикрепляется к коробке, кнопке или другому объекту. Но я не могу заставить его запускаться одним щелчком (в любом месте слайда) , чтобы он мог запускаться вместе с триггером onclick анимации выхода. Создание большой прозрачной прямоугольной формы по всему слайду и привязка к нему макроса тоже не помогает. При нажатии на нее запускается только макрос, анимация выхода не запускается.
В любом случае, я не хочу привязывать макрос к какому-либо другому объекту обходного пути, кроме самого слайда.

Кто-нибудь знает , как запускать сценарий PowerPoint VBA при событии onclick слайда?
Кто-нибудь знает секретную настройку , которая заставит анимацию выхода работать должным образом, т.е. анимировать прямо перед выходом из слайда при переходе к следующий?
Кто-нибудь знает, как победить этого дракона?

Спасибо!

13
задан joooc 12 February 2012 в 00:29
поделиться