首页 > 解决方案 > PowerPoint VBA 形状计时持续时间

问题描述

我需要帮助使用 vba 更改 PowerPoint 幻灯片中现有形状的持续时间。我能找到的只是改变添加的新效果的持续时间。我需要使用定义的时间持续时间更改现有形状的持续时间。

标签: vbapowerpointshapesanimatewithduration

解决方案


这是一般的想法,请为您的代码定制:

Sub SetTiming()
    Dim EffAnim As Effect
    Set EffAnim = ActivePresentation.Slides(1).TimeLine.MainSequence.Item(1)
    EffAnim.Timing.Duration = 5
End Sub

推荐阅读