Бөлісу құралы:


Свойство SlideShowTransition.Duration (PowerPoint)

Возвращает или задает длину анимации в секундах. Для чтения и записи.

Синтаксис

выражение. Duration

выражение Переменная, представляющая объект Timing .

Возвращаемое значение

Одинарное с плавающей точкой

Пример

В следующем примере к ней добавляется фигура и анимация, а затем задается длительность анимации.

Sub AddShapeSetTiming()

    Dim effDiamond As Effect
    Dim shpRectangle As Shape

    'Adds shape and sets animation effect
    Set shpRectangle = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeRectangle, Left:=100, _
        Top:=100, Width:=50, Height:=50)

    Set effDiamond = ActivePresentation.Slides(1).TimeLine.MainSequence _
       .AddEffect(Shape:=sh, effectId:=msoAnimEffectPathDiamond)

    'Sets duration of effect
    effDiamond.Timing.Duration = 5

End Sub

См. также

Объект TimingSlideShowTransition Object

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.