VBAで配列を使って行方向にデータ入力する方法
EXCEL VBA独学中の初心者です。
配列を使って、１ステートメントでデータを一気に入力したいと思っています。
例えば
「配列=(春,夏,秋,冬)」のとき、
「Range("A1:D1") = 配列」では(A1,B1,C1,D1)=(春,夏,秋,冬)とデータを入力できますが、
「Range("A2:A5") = 配列」では(A2,A3,A4,A5)=(春,春,春,春)となり、(春,夏,秋,冬)となってくれません。
For文を使って
Range("A2") = 配列(0)
Range("A3") = 配列(1)
Range("A4") = 配列(2)
Range("A5") = 配列(3)
とすればいいのですが、１行でいっぺんにデータを入力する方法がありましたら教えていただきたくお願いします。
----------
以下はサンプルです。
Sub 配列変数のテスト()
Dim 配列 As Variant
配列 = Array("春", "夏", "秋", "冬")
Range("A1:D1") = 配列 'このとき (A1,B1,C1,D1)=(春,夏,秋,冬)
Range("A2:A5") = 配列 'このとき (A2,A3,A4,A5)=(春,春,春,春)
'1ステートメントで (A2,A3,A4,A5)=(春,夏,秋,冬)にするには？
End Sub
お礼
ありがとうございました！！できました！！