Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna ou define a duração de uma animação, em segundos. Leitura/gravação.
Sintaxe
expression. Duration
expressão Uma variável que representa um objeto de Temporização .
Valor de retorno
Único
Exemplo
O exemplo a seguir adiciona uma forma e uma animação a essa forma e define a duração da animação.
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
Confira também
ObjetoSlideShowTransition do Objeto de Temporização
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.