arrays - ある範囲の列値を2次元配列に格納する方法

Question

以下のコードを使用して、上記のタスクを実行しました。

Dim Arr(2,150)

Arr(0)=objsheet.Range("B16:B225").Value

しかし、「添え字が範囲外エラー」というエラーが発生します。まず、これはループを使用せずにセルをアレイにコピーする方法ですか、それとも他の方法がありますか？

Answer 1

いいえ、そうではありません。

必要なもの:

Dim arr as Variant

arr = yourSheet.Range("B16:B225").value