通过 VBA 添加宏动作会重置动画时间轴

Question

我有一个形状，它有一个进入动画并在单击时运行以下宏：

With ActivePresentation.Slides(m).Shapes("XYZ").ActionSettings(ppMouseClick)
    .Action = ppActionNone
    .AnimateAction = True
End With

一旦我点击按钮，它就会消失并且动画被重置。我需要在演示文稿视图中单击 'next' 才能再次进入幻灯片。

我尝试删除行 .AnimateAction = True 但没有产生任何积极的结果。我试过 .Visibility = True 但形状是可见的，幻灯片刚刚重置了所有动画。

如何删除所有与该按钮相关联的宏，同时确保动画时间轴未重置。

Answer 1

Call SlideShowWindows(1).View.GotoClick(msoClickStateAfterAllAnimations)

让您的动画时间轴重置。然后让所有动画播放。

Adding Macro Action via VBA resets Animation Timeline