For文と配列

質問

下のFor文でセルに0から9999の数字を入力しようとしたのですが
「forで指定された変数は既に使用されています」というエラーがでます。

Dim i As Integer
Dim Num(3) As Integer

For Num(0) = 0 To 9
For Num(1) = 0 To 9
For Num(2) = 0 To 9
For Num(3) = 0 To 9
Cells(i, 1) = Num(3) + Num(2) * 10 + Num(1) * 100 + Num(0) * 1000
i = i + 1
Next Num(3)
Next Num(2)
Next Num(1)
Next Num(0)

他には何にも書いていないマクロなので他所で使用しているとも思えないですが
うまくゆきません。
続きの作業でNum()を配列として作業したいのでこの形を変えたくありません。
何がいけないのでしょう？

回答No.1

Chimrin · ベストアンサー

For文のカウント用変数に配列変数は使えないようです。ヘルプを参照してください。

お礼

ご回答ありがとうございます。
会社のパソコンで作業しているのですがヘルプを
開くとなぜかしらエクセルが止まっちゃうんです。

マニュアル片手に作業中ですが、
仕様とはうかつでした。
泥臭い方法ですがカウント用の辺すを別に用意して
毎回代入するようにしました。

回答No.2

mshr1962

0000から9999でいいならそんなことしなくても
Dim i As Integer
For i = 1 to 9999
Cells(i,1)=i
Next i
でいいのでは？

お礼

質問文にも書きましたが、配列を使って作業したかったのです。
9999までのカウントはエラーの原因切り分けに
他の部分を全て削ったもので、実現したい最終形態ではないのでお知らせいただいた方法では解決できません。