Microsoft Access 掲示板

Microsoft Access 掲示板

Accessのフォームの日付テキストボックスに入力する値が重複していると新規に入力できなくするには？ / 2

2
hiroton 2021/08/19 (木) 09:05:32 6e3e0@f966d

例えば、2021/08/18というデーターが過去に
あったなら、カレンダーや手入力で2021/08/18と
入力できなくする方法はありますか？

インデックスを使用してテーブル フィールドの値の重複を防ぐ

既に入力された日付です。OK、NO
みたいな形

これはOKなら重複を許すということですか？
上記方法はデータベース的に重複を許さない形なので、これをやりたい場合は自前で制御を組む必要があります。更新前処理イベントで入力しようとした値がすでに登録されているかどうかチェックすればいいですね

Private Sub 日付_BeforeUpdate(Cancel As Integer)
    If Not IsNull(DLookup("日付", "テーブル名", "日付=#" & Me.日付 & "#")) Then
        If MsgBox("既に入力された日付です。登録してもいいですか？", vbOKCancel) = vbCancel Then
            Cancel = True
        End If
    End If
End Sub
通報 ...