![Excel VBA 2次元配列の貼り付け](https://vba-nav.com/wp-content/uploads/2023/11/53454ec9eef6cd09ba3e403b8812ca03.png)
Excel VBAの2次元配列を貼り付けする具体的な使い方や、注意点やサンプルコードを紹介します。
Excel VBA 2次元配列の貼り付け
以下のようなシーンで利用されます。
・プログラムで生成または処理された2次元配列のデータをExcelのセルに表示したい場合
・Excel外部で処理されたデータをExcelに持ち込み、可視化したい場合
ポイント
貼り付け先のセルの範囲は適切に指定する必要があります
Excel VBA 2次元配列の貼り付けサンプルコード
Option Explicit
Sub PasteArrayToWorksheet()
Dim myArray(1 To 3, 1 To 4) As Variant
Dim i As Integer, j As Integer
' 2次元配列に初期値を設定
For i = 1 To 3
For j = 1 To 4
myArray(i, j) = i * 10 + j
Next j
Next i
' 2次元配列をワークシートに貼り付け
Range("A1").Resize(UBound(myArray, 1), UBound(myArray, 2)).Value = myArray
End Sub
サンプルコードは、ワークシートのA1セルから始まる範囲に 2次元配列myArray のデータを貼り付けています。