user_mobilelogo

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
 

 

Statistiques

Aujourd'hui317
Hier2475
Cette semaine13509
Ce mois5503
Total depuis 200417290374

8
visiteurs actuellement en ligne

3 juin 2023