哀戦士のオンラインメモ帳。 忍者ツールズって15年前にお世話になってたけど今も 残っててびっくりした。
[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。
コピー範囲を配列に入れて、一括で貼り付けします。
Sub Sumple4()
Dim MyArray As Variant
MyArray = Range(Cells(1, 1), Cells(10000, 1))
Range(Cells(1, 2), Cells(10000, 2)) = MyArray
End Sub
https://officedic.com/excel-vba-copy-paste-highspeed/#toc3
また、CurrentRegionプロパティを使って指定したセルを含む、セルの範囲指定が可能です。
ただし、CurrentRegionプロパティを使う場合は、表の途中に空白行がないことが前提となりますのでご注意ください。
https://lbibouroku.hatenablog.com/entry/array_6
グラフの要素を配列で与える
https://learn.microsoft.com/ja-jp/office/vba/api/excel.series.xvalues