Accessに関する質問です。 クエリーQ出勤 からフォームF出勤を作成 フォームは分割フォームで作

Accessに関する質問です。
クエリーQ出勤 からフォームF出勤を作成
フォームは分割フォームで作成
質問は分割フォームの出勤可否【yes/NO（チェック）】
を一括入力したいのですが可能ですか？

質問者からの補足コメント

• 可能であれば作り方を教えていただけますか？

    補足日時：2023/05/26 08:58

No.1 回答者： bonaron 回答日時： 2023/05/30 01:40

細かい説明が無いので適当にやってます。

若干、手抜きしてます。

Private Sub cmdオフ_Click()
　　Call Check(False)
End Sub

Private Sub cmdオン_Click()
　　Call Check(True)
End Sub
　　
Private Sub Check(sw As Boolean)
　　Dim rst As DAO.Recordset
　　Set rst = Me.RecordsetClone
　　With rst
　　　　.MoveFirst
　　　　Do Until .EOF
　　　　　　.Edit
　　　　　　 !出勤可否 = sw
　　　　　　 .Update
　　　　　　.MoveNext
　　　　Loop
　　End With
　　Me.Refresh
End Sub

この回答へのお礼

おはようございます。
本日出勤して試してみます。
ありがとうござます。
Access初心者なのでまた質問させていただくと思います。
時間があればまた御回答よろしくお願いします。
ありがとうございました。

お礼日時：2023/05/30 04:40