Access業務システムの改定のお手伝い-2

Access業務システムの改定のお手伝いをしていますが、なかなか、すんなりとはいきません。

見積書のデータを請求書にコピーする処理は、出来ていたのですが、

処理手順として、SQL文を発行して、更新、追加の処理をした後、フォームに変更を反映させるため、Requeryで処理してしまいました。

「直後の画面では見積書データと異なったデータが表示されますが、accessを再起動すると正常に表示されます。」

と不具合のご連絡をいただきました。

Requeryで反映させたため、請求書の表示が、 最初のレコードに戻ってしまった不具合です。

Recordset.RecordCountで表示しているレコード番号を取得し、

GoToRecord でレコード番号のデータを再表示する処理に変更しました。

まだ、ＶＢＡにはそれほど慣れておられないので、こちらで動作確認をして、お渡しするのですが、ようやく、どのような使われ方をするのかが、こちらでも理解でき始めました。