GraphicItems.AddCopy, méthode (Visio)

Ajoute une copie d'un objet GraphicItem à la collection GraphicItems d'un objet Master de type visTypeDataGraphic.

Remarque

Cet objet ou ce membre Visio est disponible uniquement pour les titulaires d’une licence d’utilisation de Visio Professionnel 2013.

Syntaxe

expression. AddCopy( _GraphicItem_ )

Expression Expression qui renvoie un objet GraphicItems .

Parameters

Nom	Requis/Facultatif	Type de données	Description
GraphicItem	Requis	[IVGRAPHICITEM]	Objet GraphicItem à copier.

Valeur renvoyée

GraphicItem

Remarques

L'objet GraphicItem que vous souhaitez ajouter doit déjà exister dans la collection GraphicItems d'un autre objet Master de type visTypeDataGraphic.

Après avoir ouvert une copie d’un objet Master de type visTypeDataGraphic à l’aide de la méthode Master.Open en vue de la modifier, vous devez utiliser la méthode Master.Close pour valider toutes les modifications apportées à la forme de base ouverte. Fermer la copie d’une forme de base de graphique de données réapplique également le graphique données à toutes les formes auxquelles il était précédemment appliqué.

Remarque

Pour plus d’informations sur la raison pour laquelle il est nécessaire de modifier une copie d’une forme de base au lieu du maître lui-même, consultez Master.Open.

Exemple

La macro Microsoft Visual Basic pour Applications (VBA) ci-dessous illustre l'utilisation de la méthode AddCopy pour ajouter une copie d'un élément de graphique de données existant à la collection GraphicItems d'un objet Master.

La macro utilise la méthode Masters.AddEx pour ajouter un nouvel objet Master de type visTypeDataGraphic à la collection Masters du document actif. Ensuite, il utilise la méthode Master.Open pour obtenir une copie du nouveau masque de graphique de données à modifier.

Ensuite, la méthode obtient une copie d’un élément de graphique de données existant qui est le premier élément de la collection GraphicItems d’une forme de base existante. Enfin, elle utilise la méthode AddCopy pour ajouter la copie de l'élément de graphique de données existant à la collection GraphicItems de la copie de la nouvelle forme de base, puis elle ferme la copie.

La macro suppose que vous connaissez le nom de la forme de base de graphique de données (« old_master_name ») qui contient un ou plusieurs éléments graphiques que vous souhaitez ajouter au nouveau masque. Vous pouvez déterminer le nom d'une forme de base de graphique existante en déplaçant la souris sur cette forme de base dans le volet Office Graphiques de données de l'interface utilisateur de Visio.

Public Sub AddCopy_Example() 
 
    Dim vsoMaster As Visio.Master 
    Dim vsoMasterCopy As Visio.Master 
    Dim vsoMaster_Old As Visio.Master 
    Dim vsoGraphicItem As GraphicItem 
    Dim vsoGraphicItem_Old As Visio.GraphicItem 
 
    Set vsoMaster = Visio.ActiveDocument.Masters.AddEx(visTypeDataGraphic) 
    Set vsoMasterCopy = vsoMaster.Open 
    Set vsoMaster_Old = ActiveDocument.Masters("old_master_name ") 
    Set vsoGraphicItem_Old = vsoMaster_Old.GraphicItems(1) 
    Set vsoGraphicItem = vsoMasterCopy.GraphicItems.AddCopy(vsoGraphicItem_Old) 
    vsoMasterCopy.Close     
 
End Sub

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.