[ＥＸＣＥＬVBA]セルの内容を２次元配列に格納（逆もしかり）

これ知ってると大分コードがシンプルになった。

（参考元）
http://kazemati.blogspot.com/2008/09/vba.html


'-------------------------------------------------------
'セルの内容を２次元配列に格納(要素１～で作られるみたい。)
Dim ArrayTEST As Variant: ArrayTEST = ThisWorkSheet.Range("N1:N5")

For j = 0 To UBound( ArrayTEST  ) - 1
     MsgBox (ArrayTEST(j + 1, 1))
Next

'逆に、配列の内容をセルに一気に入れることも可能。
ThisWorkSheet.Range("A1:A5") = ArrayTEST
'-------------------------------------------------------

今まで知らなくて後悔…！！