Access VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

6729 / 9994

←次へ　｜　前へ→


	【6464】Re:レコードは削除されているエラー

小僧 - 05/10/13(木) 10:01 -


	引用なし

	パスワード

▼山田さん：
おはようございます。

>'**************************************************
>'WT_年度予算AへT_年度予算のデータ追加
>'**************************************************
>Do Until rs1.EOF
>…
>Loop
>
>'**************************************************
>'T_年度予算BへWT_年度予算のデータ追加
>'**************************************************
>
>rs2.MoveFirst
>
>Do Until rs2.EOF
> rs1.Find "年度CD='" & rs2!年度CD & "'"

「WT_年度予算AへT_年度予算のデータ追加」で
rs1 が「EOF」の位置になるまでループさせたまま

「T_年度予算BへWT_年度予算のデータ追加」において
そのまま Find メソッドを使っているからではないでしょうか。

rs1 もMoveFirst しても結果は変わりませんか？

外していたらすみません。

217 hits

▼

【6455】レコードは削除されているエラー 山田 05/10/12(水) 11:15