VBA～セルを図としてコピー、貼り付けしよう～Excel

VBAでセルを図としてコピー、貼り付けしたい場合はRange.CopyPictureメソッドでコピーします。

下のコードを実行すると"商品評価"というシートのセルA1からD8の範囲を図としてコピーし、"週間売上個数"というシートのセルA12に図として貼り付けます。

Sub test1()

Worksheets("商品評価").Range("A1:D8").CopyPicture
Worksheets("週間売上個数").Activate
ActiveSheet.Range("A12").PasteSpecial

End Sub