GraphicItems.AddCopy 方法 (Visio)

将 GraphicItem 对象的副本添加到 visTypeDataGraphic 类型的 Master 对象的 GraphicItems 集合中。

注意

此 Visio 对象或成员仅供 Visio Professional 2013 的授权用户使用。

语法

expression。 AddCopy( _GraphicItem_ )

表达 返回 GraphicItems 对象的表达式。

参数

名称	必需/可选	数据类型	说明
GraphicItem	必需	[IVGRAPHICITEM]	要复制的 GraphicItem 对象。

返回值

GraphicItem

备注

要添加的 GraphicItem 对象必须已存在于 visTypeDataGraphic 类型的另一个 Master 对象的 GraphicItems 集合中。

在使用 Master.Open 打开 visTypeDataGraphic 类型的 Master 对象的副本进行编辑之后，必须使用 Master.Close 方法提交在主控形状打开时对其进行的所有更改。 关闭数据图形主控形状的副本时，还会将数据图形重新应用于以前已应用了该图形的所有形状。

注意

有关为何需要编辑主控形状的副本而不是主控形状本身的详细信息，请参阅 Master.Open。

示例

下面的 Microsoft Visual Basic for Applications (VBA) 宏演示如何使用 AddCopy 方法将现有数据图形项目的副本添加到 Master 对象的 GraphicItems 集合中。

该宏使用 Masters.AddEx 方法将 visTypeDataGraphic 类型的新 Master 对象添加到活动文档的 Masters 集合中。 然后，它使用 Master.Open 方法获取要编辑的新数据图形母版的副本。

接下来，方法获取现有数据图形项的副本，该项是现有主控形状的 GraphicItems 集合中的第一项。 最后，它使用 AddCopy 方法将现有数据图形项目的副本添加到新主控形状副本的 GraphicItems 集合中，然后关闭主控形状副本。

宏假定你知道现有数据图形主控形状 (的名称“ old_master_name ”) ，其中包含要添加到新主控形状的一个或多个图形项。 在 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

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。