Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


72678 / 76732 ←次へ | 前へ→

【8536】Re:For Next 2つの同時進行
お礼  ポメラニアン  - 03/10/22(水) 22:37 -

引用なし
パスワード
   >では、こんな感じでしょうか?
>Sub test()
>  With Worksheets("sheet1")
>   For i% = 1 To 20
>     For P% = 1 To 10
>      NN% = NN% + 1 'カウンタ
>      .Cells(P%, 1).Value = (NN% - 1) Mod 25 + 1 '25で循環するとする。
>     Next P%
>     MsgBox "Next", vbInformation, i%
>   Next i%
>  End With
>End Sub

適切なご教授 ありがとうございました。
カウンタの設置がミソですね。(^^;
試してみたいと思います。

1 hits

【8524】For Next 2つの同時進行 ポメラニアン 03/10/22(水) 16:29 質問
【8531】Re:For Next 2つの同時進行 りん 03/10/22(水) 18:07 質問
【8533】Re:For Next 2つの同時進行 ポメラニアン 03/10/22(水) 18:56 質問
【8535】Re:For Next 2つの同時進行 りん 03/10/22(水) 20:10 回答
【8536】Re:For Next 2つの同時進行 ポメラニアン 03/10/22(水) 22:37 お礼

72678 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free