Свойство Timing.TriggerDelayTime (PowerPoint)

Задает или возвращает задержку (в секундах) с момента включения триггера анимации. Для чтения и записи.

Синтаксис

выражение. TriggerDelayTime

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

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

Одинарное

Пример

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

Sub AddShapeSetTiming()

    Dim effDiamond As Effect
    Dim shpRectangle As Shape

    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:=shpRectangle, effectId:=msoAnimEffectPathDiamond)

    With effDiamond.Timing
        .Duration = 5
        .TriggerShape = shpRectangle
        .TriggerType = msoAnimTriggerOnShapeClick
        .TriggerDelayTime = 3
    End With

End Sub

См. также

Объект Timing

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

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