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

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

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

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

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

Я написал сценарий 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 

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

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

Спасибо!