- 1 名前：デフォルトの名無しさん mailto:sage [2009/09/30(水) 12:25:04 ]
- 過去スレ
01 pc11.2ch.net/test/read.cgi/tech/1054356121/
02 pc11.2ch.net/test/read.cgi/tech/1168308855/
03 pc11.2ch.net/test/read.cgi/tech/1180192018/
04 pc11.2ch.net/test/read.cgi/tech/1189814602/
05 pc11.2ch.net/test/read.cgi/tech/1197448064/
06 pc11.2ch.net/test/read.cgi/tech/1205231499/
07 pc11.2ch.net/test/read.cgi/tech/1212587819/
08 pc11.2ch.net/test/read.cgi/tech/1219673793/
09 pc11.2ch.net/test/read.cgi/tech/1228372971/
10 pc12.2ch.net/test/read.cgi/tech/1235332603/
11 pc12.2ch.net/test/read.cgi/tech/1241885130/
12 pc12.2ch.net/test/read.cgi/tech/1247566074/
- 620 名前：デフォルトの名無しさん mailto:sage [2009/11/13(金) 22:26:21 ]
- >>619
個人的には
>For i = 1 To 600
に突っ込みたいが、まじめに答えるとi=10の時にi=1にしろって指示してるので
i=1 → 10 → 1 → 10 → の無限ループになってる
1,2,・・・10,1,2,・・・ と繰り返したいなら cells(i,1)=i%10 みたいに余りを計算すれば良い
（余りの計算は %じゃなくてmodとかかも知れない。忘れた）
- 621 名前：デフォルトの名無しさん mailto:sage [2009/11/13(金) 22:27:52 ]
- ごめん
１０で割って余りだと0,1,2,・・・,9,0,1,・・・ってなるから１足せ
|
 |
