Méthode Designs.Clone (PowerPoint)

Crée une copie d’un objet Design .

Syntaxe

expression. Clone( _pOriginal_, _Index_ )

Expression Variable qui représente un objet Designs .

Parameters

Nom Requis/Facultatif Type de données Description
pOriginal Requis Concevoir Objet de conception . La conception d’origine.
Index Facultatif Long L’emplacement de l’index dans la collection Designs dans laquelle la conception sera copiée. Si index est omis, la conception dupliquée est ajoutée à la fin de la collection Designs.

Valeur renvoyée

Design

Exemple

Cet exemple crée une conception et la duplique.

Sub CloneDesign()

    Dim dsnDesign1 As Design
    Dim dsnDesign2

    Set dsnDesign1 = ActivePresentation.Designs _
        .Add(designName:="Design1")

    Set dsnDesign2 = ActivePresentation.Designs _
        .Clone(pOriginal:=dsnDesign1, Index:=1)

End Sub

Voir aussi

Designs, objet

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.