[[20200114131557]]　『配列内の範囲指定』（zunzun）　ページの最後に飛ぶ

『配列内の範囲指定』（zunzun）

お世話になっております。
配列を使ってマクロを作成しています。
下記の6行目構文で、配列の0,40～LR1-41,40
の範囲に4を入力する方法で悩んでいます。
配列では、Renge（”A1：D1”）のような範囲指定はできないのでしょうか？
何かヒントをご教授下さい。よろしくお願いいたします。

 Dim LR1 As Long
 Dim A As Variant

 LR1 = Cells(Rows.Count, 1).End(xlUp).Row
 ReDim A(LR1 - 41, 51)

 　If Cells(17, 9) <> "" Then
  　 A(0, 40) = 4
　 End if

＜使用 Excel：Excel2019、使用 OS：Windows10 ＞

dim a as variant
dim x as long
dim i as long
x = inputbox("x?"
redim a(x,40)
for i = 0 to x
a(i,40) = 4
next i

dim z as variant
z = range("a1:d1")

よくわかりませんがこれをステップ実行してローカルウィンドウを見てみてください。
（None） 2020/01/14(火) 13:47

VBAの配列では、そうしたslice処理は実装されていないので、
繰り返し処理で対応して下さい。

（γ） 2020/01/14(火) 13:58

Noneさん、γさん

配列での範囲指定が出来ないこと、了解しました。
FOR文で修正します。
ありがとうございました。
（zunzun） 2020/01/14(火) 14:07

コメント返信：