忍者ブログ

HITORIGOTO

哀戦士のオンラインメモ帳。 忍者ツールズって15年前にお世話になってたけど今も 残っててびっくりした。

VBA高速化テク

×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。

VBA高速化テク

コピー範囲を配列に入れて、一括で貼り付けします。


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プロパティを使って指定したセルを含む、セルの範囲指定が可能です。


Sub dataArray1_4() Dim sampleDataArr As Variant sampleDataArr = Sheet1.Cells(1, 1).CurrentRegion.Value End Sub

ただし、CurrentRegionプロパティを使う場合は、表の途中に空白行がないことが前提となりますのでご注意ください。

https://lbibouroku.hatenablog.com/entry/array_6

グラフの要素を配列で与える

https://learn.microsoft.com/ja-jp/office/vba/api/excel.series.xvalues

PR

コメント

プロフィール

HN:
哀戦士
性別:
非公開

P R