| 投稿日 | ： 2002/09/19(Thu) 13:02 |
| 投稿者 | ： ＮＡＯ★ |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re: エクセルについての質問です |
質問の文面からすると End If の前の行に
j = j + 1
を入れればいいのですが、
このサンプルのプログラムを見る限り
Loopの前に入れないと期待した動きにならないでしょう。
j = 4 '初期化
For ii = 1 To filekensaku
If FileLen(マスターパス & Nowdate & "\" & strMyfile(ii)) = 0
Then
Else
Do Until EOF(1)
'略
j = j + 1
Loop
End If
Next ii