質問: 「access vba 文字の部分のみ、重複する場合はエラーを出したい」 学習塾にて、前任の方が作成したaccessデータベースを使っています。 以下のようなレコードが、生徒数分あります。 中1 ふくろ知恵(生徒氏名) 国語 あ1
回答: 登録前に、テーブルに対象の生徒氏名で、同じ受講時間に登録されたレコードがあるかカウントし、1件でもあれば登録済みのメッセージを表示し、登録を中断する必要があります。 判定文は下記のようになると思いますが、テーブル名、フィールド名、登録ボタンの有無など不明なので、適当に書いています。 If DCount("*","テーブル名","生徒氏名='" & Me![フォーム上の生徒氏名] & "' AND 受講クラス Like '" & Left(Me![入力した受講クラス] & "*'") > 0 Then Mgbox "すでにこの時間は登録されています" End if