Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает объект Sequence , представляющий коллекцию объектов Effect в основной последовательности анимации слайда.
Синтаксис
выражение. MainSequence
выражение Переменная, представляющая объект TimeLine .
Возвращаемое значение
Sequence
Замечания
Значением по умолчанию свойства MainSequence является пустая коллекция Sequence . Любая попытка вернуть значение из этого свойства без добавления одного или нескольких объектов Effect в основную последовательность анимации приведет к ошибке во время выполнения.
Пример
В следующем примере анимация бумеранга добавляется к новой фигуре на новом слайде, добавленном в активную презентацию.
Sub NewSequence()
Dim sldNew As Slide
Dim shpnew As Shape
Set sldNew = ActivePresentation.Slides.Add(Index:=1, Layout:=ppLayoutBlank)
Set shpnew = sldNew.Shapes.AddShape(Type:=msoShape5pointStar, _
Left:=25, Top:=25, Width:=100, Height:=100)
With sldNew.TimeLine.MainSequence.AddEffect(Shape:=shpnew, _
EffectId:=msoAnimEffectBoomerang)
.Timing.Speed = 0.5
.Timing.Accelerate = 0.2
End With
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.