如何在退出動畫結束后自動推進 PowerPoint 幻燈片？

Question

使用“開始：與上一個”設置的 PowerPoint 入口動畫會在新幻燈片前進時立即開始。 但是，如果您以相同的方式設置退出動畫，則它不會以幻燈片結束序列開始。 相反，需要使用“開始：點擊”觸發器，在退出動畫結束后，您仍然需要額外點擊一次才能前進到下一張幻燈片。

解決方法很明顯：創建一個重復的幻燈片，使原始幻燈片的結束動畫成為復制幻燈片上的開始動畫，然后隨心所欲地跟隨它們，或者僅使用這些結束動畫創建過渡幻燈片並進行設置“更改前進幻燈片 -> 之后自動 -> [完成動畫所需的時間]”。

這些解決方法將使其在視覺上為您的觀眾服務。 但是，它會影響您可能需要相應調整和/或重復內容更改的幻燈片編號。 如果您是唯一一個創建和使用演示文稿的人，這可能就好了。 但是，如果您正在與其他三個人以協作模式創建演示文稿，並且甚至不知道最后誰將成為演示者，那么您可能會把事情搞砸。

讓我們具體一點：我的大部分幻燈片都有 0.2 秒的入口動畫，應用於來自右側、底部或左側的內容塊。 前進到下一張幻燈片，我希望它們在另一個 0.2 秒的退出動畫中飛出，然后是新幻燈片 0.2 秒在新塊的入口動畫中飛出。 should be triggered while advancing to the next slide, as usually.像在前進到下一張幻燈片時應該觸發的。
如前所述，如果沒有在幻燈片之間額外單擊一下，我將無法實現這一目標。

我寫了一個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

當綁定在框、按鈕或其他對象上時，它運行良好。 so that it could start together with the exit animation onclick trigger.但是我不能讓它在一次單擊以便它可以與退出動畫 onclick 觸發器一起啟動。 在整個幻燈片上創建一個大的透明矩形並在其上綁定宏也無濟於事。 通過單擊它，您只會運行宏，不會觸發退出動畫。
無論如何，我不想將宏綁定到任何其他解決方法對象，但幻燈片本身。

任何人都知道如何在幻燈片 onclick 事件上觸發 PowerPoint VBA 腳本？
任何人都知道一個秘密設置，可以使退出動畫按預期工作，即在退出幻燈片之前同時過渡到下一個幻燈片時動畫？
有誰知道怎么打這個龍？

謝謝！

Answer 1

您還可以設置 TRANSITIONS（選項卡）-> 00:00:00 秒后前進幻燈片。 您需要將幻燈片（選項卡）設置為使用（排練）計時。 這將在最后一個動畫動作后自動推進幻燈片。 當然，您可以給它幾秒鍾的等待時間，但聽起來您只想推進幻燈片。

Answer 2

您可以使用 class 模塊攔截 powerpoint 中的事件

課堂模塊

在 VBA 資源管理器的左側組合（對象）中，您可以看到 ppt，右側則是您的事件

Private WithEvents ppt As PowerPoint.Application

常用模塊使用

set x= new class1

現在您可以使用所有演示事件。

[] 的

Answer 3

OnSlideShowPageChange：VBA 在不按任何按鈕進入幻燈片時工作

Sub OnSlideShowPageChange(ByVal SSW As SlideShowWindow)
If SSW.View.CurrentShowPosition = SSW.Presentation.Slides(x).SlideIndex Then
'PUT CODE HERE
End If
End Sub

Answer 4

他們是一個代碼havy解決方法你使用重復的方法來做到這一點。 但是，您無需手動使用 vba 進行復制。 如果幻燈片需要使用您選擇的命名方案進行復制，您可以使用 OnSlideShowPageChange 測試。 然后復制幻燈片。 然后將過渡效果設置為非並使其在 0 秒持續時間后過渡。 然后刪除所有動畫並添加所需的退出動畫。 然后使用 SlideShowEnd 事件刪除所有重復的幻燈片。 請注意，您可以使用 SlideShowBegin 一次復制所有幻燈片，但是復制幻燈片並不是一個快速的任務。 因此，如果您有大量的幻燈片來復制分層，您的演示可能需要幾秒鍾的時間。 很抱歉沒有提供代碼，因為它需要幾行。 為了命名幻燈片，您還可以使用宏。