Excel VBA質問箱 IV

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

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


72685 / 76738 ←次へ | 前へ→

【8535】Re:For Next 2つの同時進行
回答  りん E-MAIL  - 03/10/22(水) 20:10 -

引用なし
パスワード
   ポメラニアン さん、こんばんわ。

>リンさんの例の下のような形です。
>1 ←この上に5を上書き.
>2 ←この上に1を上書き.
>3 ←この上に2を上書き.
>4 ←この上に3を上書き.
>
>という形です。

では、こんな感じでしょうか?
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

0 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 お礼

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