您可以将 Powerpoint 中的动画“展开”到幻灯片吗？

Question

我目前正在准备一份 Powerpoint 中的“最终报告”文档，该文档要求我不要包含动画。但是，要组合的各种源文档包括动画。

我正在寻找一种为每个动画步骤自动生成幻灯片的方法。基本上与将幻灯片导出为带有动画步骤的 PDF 的功能相同，不同之处在于动画步骤仍然是 powerpoint 幻灯片。

有没有办法自动实现这一点，还是我必须复制幻灯片并自己准备动画步骤？

Answer 1

使用名为 Massimo Rimondini 的人为 MS Office 提供的 PPspliT 插件。它完全符合您的要求。我检查了 Office 2013，它工作正常。

---

奖金：

如果该插件无法删除所有动画并转换为单独的幻灯片（这不太可能），您可以禁用幻灯片放映的任何剩余动画，或使用宏将它们完全删除。

禁用动画：

您可以通过转到“设置幻灯片放映”并在“显示选项”下勾选“不显示动画”选项来关闭动画，然后单击确定。现在运行该节目，它将显示没有动画。

完全删除动画：

如果你真的想在一次扫描中删除所有动画，那么你需要运行这个宏。

Sub StripAllBuilds()
    Dim I As Integer: Dim J As Integer
    Dim oActivePres As Object
    Set oActivePres = ActivePresentation
    With oActivePres
        For I = 1 To .Slides.Count
            If Val(Application.Version) < 10 Then
                ' Older versions of PowerPoint 97/2000
                ' In each slide set the animation property
                ' of the Shape object to FALSE
                For J = 1 To .Slides(I).Shapes.Count
                    .Slides(I).Shapes(J).AnimationSettings.Animate = msoFalse
                Next J
            Else
              ' New versions support the Timeline object
                For J = .Slides(I).TimeLine.MainSequence.Count To 1 Step -1
                    .Slides(I).TimeLine.MainSequence(J).Delete
                Next J
            End If
        Next I
    End With
    Set oActivePres = Nothing
End Sub