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.
MoveTo (toPos)
toPos: A posição no índice a qual será movido o efeito de animação.
Dim lngtoPos As Long: lngtoPos =
ActivePresentation.Slides.Range(1).MoveTo toPos:=lngtoPos