CopyPicture Method

Microsoft Excel Visual Basic

Copies the selected object to the Clipboard as a picture. Variant.

expression.CopyPicture(Appearance, Format)

expression    Required. An expression that returns one of the above objects.

Appearance   Optional XlPictureAppearance. Specifies how the picture should be copied.

XlPictureAppearance can be one of these XlPictureAppearance constants.
xlPrinter. The picture is copied as it will look when it's printed.
xlScreen default. The picture is copied to resemble its display on the screen as closely as possible

Format   Optional XlCopyPictureFormat. The format of the picture.

XlCopyPictureFormat can be one of these XlCopyPictureFormat constants.
xlBitmap
xlPicture default

ShowCopyPicture method as it applies to the ChartObject, ChartObjects, OLEObject, and OLEObjects objects.

Copies the selected object to the Clipboard as a picture. Variant.

expression.CopyPicture(Appearance, Format)>

expression    Required. An expression that returns one of the above objects.

Appearance   Optional XlPictureAppearance. Specifies how the picture should be copied.

XlPictureAppearance can be one of these XlPictureAppearance constants.
xlPrinter. The picture is copied as it will look when it's printed.
xlScreen default. The picture is copied to resemble its display on the screen as closely as possible

Format   Optional XlCopyPictureFormat. The format of the picture.

XlCopyPictureFormat can be one of these XlCopyPictureFormat constants.
xlBitmap
xlPicture default

ShowCopyPicture method as it applies to the Chart object.

Copies the selected object to the Clipboard as a picture.

expression.CopyPicture(Appearance, Format, Size)

expression    Required. An expression that returns one of the above objects.

Appearance   Optional XlPictureAppearance. Specifies how the picture should be copied.

XlPictureAppearance can be one of these XlPictureAppearance constants.
xlPrinter. The picture is copied as it will look when it's printed.
xlScreen default. The picture is copied to resemble its display on the screen as closely as possible

Format   Optional XlCopyPictureFormat. The format of the picture.

XlCopyPictureFormat can be one of these XlCopyPictureFormat constants.
xlBitmap
xlPicture default

Size   Optional XlPictureAppearance. The size of the copied picture when the object is a chart on a chart sheet (not embedded on a worksheet).

XlPictureAppearance can be one of these XlPictureAppearance constants.
xlPrinter default. The picture is copied to match its printed size as closely as possible.
xlScreen. The picture is copied to match the size of its display on the screen as closely as possible.

ShowCopyPicture method as it applies to the Shape object.

Copies the selected object to the Clipboard as a picture.

expression.CopyPicture(Appearance, Format)

expression    Required. An expression that returns one of the above objects.

Appearance   Optional XlPictureAppearance. Specifies how the picture should be copied.

XlPictureAppearance can be one of these XlPictureAppearance constants.
xlPrinter. The picture is copied as it will look when it's printed.
xlScreen default. The picture is copied to resemble its display on the screen as closely as possible

Format   Optional XlCopyPictureFormat. The format of the picture.

XlCopyPictureFormat can be one of these XlCopyPictureFormat constants.
xlBitmap
xlPicture default

Remarks

If you copy a range, it must be made up of adjacent cells.

Example

This example copies a screen image of cells A1:D4 on Sheet1 to the Clipboard, and then it pastes the bitmap to another location on Sheet1.

Worksheets("Sheet1").Range("A1:D4").CopyPicture xlScreen, xlBitmap
Worksheets("Sheet1").Paste _
    Destination:=Worksheets("Sheet1").Range("E6")