你可以在Powerpoint中“展开”动画到幻灯片吗？

Question

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

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

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

Answer 1

使用名为Massimo Rimondini的人为MS Office使用PPspliT 加载项。它完全符合你的要求。我在Office 2013中检查过，它运行正常。

加成：

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

禁用动画：

您可以转到＆＃34;设置幻灯片放映＆＃34;关闭动画。并在＆＃34;显示选项＆＃34;勾选＆＃34;显示没有动画＆＃34;选项并单击“确定”。现在运行该节目，它将显示没有动画。

完全删除动画：

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

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