Deprecated: RegularLabs\Library\ArrayHelper::implode(): Implicitly marking parameter $last_glue as nullable is deprecated, the explicit nullable type must be used instead in /homepages/10/d550841420/htdocs/libraries/regularlabs/src/ArrayHelper.php on line 225
Comment, par VBA, copier un objet d'une diapo à l'autre

Recherche

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

France 71,7% France
Canada 5,2% Canada
Chine 4,3% Chine

Total:

161

Pays
018475152
Aujourd'hui: 294
Hier: 370
Cette semaine: 1.462
Semaine dernière: 2.492
Ce mois: 664