[Excel VBA]複数セルに値を一発で書き込み(Rangeと配列のサイズが違ったら)

実験してみる

前回、[Excel VBA]複数セルに値を一発で書き込みでやってみたことについて、
「あれ、Rangeと配列のサイズが違ったらどうなるの？」と思って、実験。

Rangeと配列のサイズが同じとき

コード

Rangeと配列のサイズが合ってる状態Set r = w.Range("B2").Resize(RowSize, ColumnSize)

実行結果

B2～F11に書き込みがされます。

Rangeを狭くしてみた。

コードを書き換え

Rangeを一列狭くしてみる。Set r = w.Range("B2").Resize(RowSize, ColumnSize - 1)

実行結果

Rangeの範囲にだけ書き込まれた。Rangeで指定されていないF列は書き込みなし。

Rangeを広くしてみた。

コードを書き換え

Rangeを一列広げてみる。Set r = w.Range("B2").Resize(RowSize, ColumnSize + 1)

実行結果

二次元配列上にない部分(G列)が「#N/A」に。