CopyPicture (方法)

将所选对象作为图片复制到剪贴板。

说明

如果复制区域，它必须由相邻单元格构成。

参数

属性	数据类型	必填	说明
Appearance	Any	可选	用于指定图片复制方式的 XlPictureAppearance 常量。默认值为 xlScreen。
Format	Any	可选	用于指定图片格式的 XlCopyPictureFormat 常量。默认值为 xlPicture。

示例

python

#本示例将第一张工作表中的第一个形状作为图片复制到剪贴板
def test():
    shapes = Application.Worksheets.Item(1).Shapes
    shapes.Item(1).CopyPicture(xlScreen, xlBitmap)

python

#本示例判断如果活动工作表中第二个形状为椭圆，则作为图片复制到剪贴板
def test():
    shapes = ActiveSheet.Shapes
    if shapes.Item(2).AutoShapeType == msoShapeOval:
        shapes.Item(2).CopyPicture()