こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

エクセル マクロ ループの使い方

超初心者です。よろしくお願いします。

以前にループのやり方を教えていただきました。

Sub ループ()
Dim i As Long
For i = 1 To 10
マクロ名
Next i
End Sub


この10回という回数の部分を変更したいと思うのですが、ここをセルA1に入力されている数字の回数分だけループを繰り返すという仕組みにしたいのですが、どのように書いたらよいでしょうか。

投稿日時 - 2013-06-25 15:24:20

QNo.8149251

暇なときに回答ください

質問者が選んだベストアンサー

たとえば、ループ回数をセルA1に書いておいたとするなら。

Sub ループ()
Dim i, N As Long

N=Range("A1").Value

For i = 1 To N
マクロ名
Next i
End Sub

こんな感じで、シートからデータを持って来ればオッケーです。
InputBoxを使う手もありますが、せっかくVBAでExcelの広大な
シートを使えるんですから、シート上のデータを生かさないと
もったいないです。

投稿日時 - 2013-06-25 15:41:38

お礼

できました!回答ありがとうございます。小さな手間だったのであまり気にしてなかったのですが最近回数をいじるのが増えてきていたので助かりました!

投稿日時 - 2013-06-25 15:59:47

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問