Access マクロ「新しいレコード」でのフォームの表示について

Question

MSアクセスの、入力用表形式フォームを作成しています。

マクロでレコード移動「新しいレコード」を指定した時に、
ある程度の量の、すでに入っているレコードが画面に見えるようにするには、どのようにすれば良いのでしょうか。

ごく単純に、
マクロ
レコード移動「新しいレコード」
とした場合、画面に表示されている行の一番上の行になりますので、既存の入力処理がどこまで行ったか? の確認に、かなり手を動かしてのひと手間が入ってしまいます。

(バーコードリーダーを使っての数字入力を想定しているため、なるべく自動化したいのです)

下記のようになっているものを、

■　画面
新しいレコード　←　ここに移動
■

下記のようにしたい、ということです。

■　画面
入力済みデータ x
入力済みデータ x
入力済みデータ x
・・・
入力済みデータ xx
新しいレコード　←　ここに移動
■

よろしくお願いします

Answer 1

マクロでするなら、

レコード移動「新しいレコード」
レコード移動「前のレコード」オフセット「5」（←表示したい件数）
レコード移動「新しいレコード」

とすればいいでしょう。

ただしレコード件数がオフセットで指定した数より少ないとエラーがでるのでエラー処理が必要です。
マクロでのエラー処理は面倒なので、VBAでするなら、フォームの読み込み時のイベントプロシージャを下記のように記述すればいいでしょう。

Private Sub Form_Load()
    On Error Resume Next 'エラーを無視
    DoCmd.GoToRecord acActiveDataObject, , acNewRec
    DoCmd.GoToRecord acActiveDataObject, , acPrevious, 10
    DoCmd.GoToRecord acActiveDataObject, , acNewRec
End Sub

Comments

[yuki-ms]

hatena19様
ありがとうございます。大変助かりました。