vba - vba を使用してフォームベースのコードを複数回実行する

Question

現在、デバイスの場所を含むデータベースと、デバイスの場所を更新し、以前の場所のコピーを保存するために使用されるフォームがあります。理想的には、「BoxNo」値 (ID フィールド) のリストを入力し、各レコードで同じ更新を使用してフォームを複数回実行できるようにする必要があります。これは VBA/SQL で可能ですか? プログラミングの知識が非常に低いため、どんな助けでも大歓迎です。

編集: Gord Thompson の要求に応じて、フォームの手順を明確にします。フォームには boxnumber テキストボックスがあります。これは、フォーム自体ではなく、ページの下部、つまりナビゲーション ペイン部分にある検索バーを使用することによってのみロックおよび変更されます。ボックス番号。ユーザーは関連するフィールドを変更してから、次のコードを実行する「更新」ボタンをクリックします (質問に関連する部分は、else ステートメントの後にあります)。

Private Sub Update_Click()

'checks whether date updated
If DateUpdated = False Then
    MsgBox "Please enter a date", vbOKOnly, "Enter Date"


    'saves copy to "changes" table
Else
    DoCmd.SetWarnings False
        DoCmd.RunSQL "INSERT INTO Change_In_Location_tbl (Sm_ID,Given_To,On_Date, Comments)           VALUES ( " & Sm_ID.OldValue & ",'" & Currently_Held_by.OldValue & "','" &       Date_Given.OldValue & "','" & Comments.OldValue & "');"
    DoCmd.SetWarnings True
    MsgBox "Update Complete", vbOKOnly

終了条件

サブ終了