Duplicate (方法)

复制对象，并返回对新复制对象的引用。

示例

python

#本示例复制第一张工作表中新建的ShapeRange对象并设置填充格式的前景色
def test():
    duplicate = Application.Worksheets.Item(1).Shapes.Range([1, 2]).Duplicate()
    duplicate.Fill.ForeColor.RGB = RGB(255, 0, 0)

python

#本示例复制活动工作表的所有形状
def test():
    shapes = ActiveSheet.Shapes
    shapes.SelectAll()
    Selection.ShapeRange.Duplicate()