La première macro copie l'objet nommé "toto" de la diapositive 1 et le colle dans la diapositive 3. L'objet sera collé exactement au même endroit.
La macro suivante copie l'objet nommé "toto" de la diapositive 1 et le colle dans le deuxième espace réservé de la diapositive 3. SI cet espace réservé est déjà rempli, l'objet se collera comme via la macro précédente, en tant qu'objet indépendant.
Sub copie()
With ActivePresentation
.Slides(1).Shapes("toto").Copy
.Slides(3).Shapes.Paste
End With
End Sub
Sub copie2()
With ActivePresentation
.Slides(1).Shapes("toto").Copy
.Slides(3).Shapes.Placeholders(2).Select
End With
ActiveWindow.View.Paste
End Sub