VBA EXCEL 出力 ループ処理で 終了後 再び実行すると出力されない件
Access VBA で レコードセットを エクセルに出力するについて、
Do Until rst.EOF
Loop
で出力をすると、一回目はうまくいくが、そのまま2回目を実行すると、なぜが出力されない。
レコードカウントはきちんと数えているのに、Do Until に入ると、EOFとみなされてしまい、一つもレコードが出力されない。
そこで、Do Ubtil rst.EOF に入る前に、必ず、 rst.Movefirst で、レコードを先頭に移動しておくことにより、確実に出力ができるようになった。