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