EXCEL VBA For to

For i = 1 To 10

の１から１０までという記述を
セルに記入してある値をひらうようにするには
どのようにすればよいのでしょうか？

For i = "A1" To "B1"
としてみましたが、うまくいきませんでした。

分かりにくい質問で申し訳ありません。

No.4 ベストアンサー 回答者： mikkey2005 回答日時： 2005/06/20 13:44

既にhana-hana3さんが仰ってますが、私も変数に格納しておくのが良いと思います。

これでしたら、変数に格納した段階のセルA1・B1の値がループ制御に使用されるので、その後セルA1・B1の値を変更してしまっても問題ありません。

intA1 = Range("A1").Value
intB1 = Range("B1").Value

For i = intA1 To intB1
　（処理内容）
Next i

この回答へのお礼

勉強不足の私に、丁寧に答えていただいてありがとうございました。

思っていたとおりの動きができました。

お礼日時：2005/06/20 16:37

No.5 回答者： fortranxp 回答日時： 2005/06/20 14:24

失礼しました。

訂正です。
For i=Range("A1").Value To Range("B1").Value
Next i

もうお分かりですね。

この回答へのお礼

VBAのことがまだよく分かっていませんでした。

様々な表記ができることがよくわかり勉強になりました。

お礼日時：2005/06/20 16:39

No.3 回答者： fortranxp 回答日時： 2005/06/20 13:11

For i=Range.("A1").Value To Range.("B1").Value

Next i

この回答への補足

早速試してみましたが、
そのまま書いてみると、
（書いた直後に）コンパイルエラー
識別子または角かっこで囲む必要がある名前が含まれています。

角カッコにすると実行したときに
コンパイルエラー
とでてRangeが反転しました

補足日時：2005/06/20 13:47

No.2 回答者： hana-hana3 回答日時： 2005/06/20 12:59

＞"A1"

では、A1 という文字の意味です。

セルの値を取得するには、＃１さんの書かれたように　Cells() を使うか、Range("A1") としてください。

また、For文 実行に別のシートがアクティブになる場合は、別のシートの値を拾ってしまうので注意してください。
できれば、For文 実行前に変数に格納した方が良いかと思います。

No.1 回答者： 6dou_rinne 回答日時： 2005/06/20 12:41

なにをしたいのがいまひとつわからないのですが、セルの内容は　Cells(行,列).value　で取り出します。