Método Slide.MoveTo (PowerPoint)
Move o objeto especificado para um local específico dentro da mesma coleção, renumerando todos os outros itens da coleção apropriadamente.
Sintaxe
expression. MoveTo
( _toPos_
)
Expressão Uma variável que representa um objeto Slide .
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
toPos | Obrigatório | Long | A posição no índice a qual será movido o efeito de animação. |
Exemplo
Este exemplo move um efeito de animação para a segunda posição, na coleção de efeitos de animação da forma especificada.
Sub MoveEffect()
Dim sldFirst as Slide
Dim shpFirst As Shape
Dim effAdd As Effect
Set sldFirst = ActivePresentation.Slides(1)
Set shpFirst = sldFirst.Shapes(1)
Set effAdd = sldFirst.TimeLine.MainSequence.AddEffect _
(Shape:=shpFirst, effectId:=msoAnimEffectBlinds)
effAdd.MoveTo toPos:=2
End Sub
Este exemplo move o segundo slide na apresentação ativa para a posição do primeiro slide.
Sub MoveSlideToNewLocation()
ActivePresentation.Slides(2).MoveTo toPos:=1
End Sub
Confira também
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.