Access2000の重複チェック

質問

現在あるデータとあるフィールド内において値が重複してある場合こちら側からエラーを出したいのですがどうすればいいですか？

テーブル名：テナントマスタ
フォーム：txtビル区分、txtテナントコード、…etc

テナントマスタ

ビル区分　テナントコード
-----------------------
01 100
01 101
02 102
02 103

ここに新たにフォーム上でビル区分、テナントコードを入力し、この値がそれぞれ01、101だったときbtn登録をクリックしたときこちらからエラーをだしたいのです！

どうかよろしくお願いします！！

回答No.1

maruru01 · ベストアンサー

こんにちは。maruru01です。

新規登録であれば、DCount関数で出来ます。

If DCount("テナントコード", "テナントマスタ", "ビル区分 = '" & Me!txtビル区分.Value & "' AND テナントコード = '" & Me!txtテナントコード.Value & "'") <> 0 Then
　　(重複している場合の処理)
Else
　　(重複していない場合の処理)
End If

ちなみに本筋とはまったく関係ありませんが、コマンドボタンのプリフィックス（前置文字）は、"btn"よりも"cmd"の方が一般的ですよ。
まあ、余計なことかも知れませんが。

お礼

いつもありがとうございます！
大変ありがたいです！
今後とともよろしくお願いします！

ちなみ"cmd"とするのが一般的なのは知っています！ただ自分がわかればいいので"btn"という風にしています！人に見せたりするものでもないので…

また、おかしなところがありましたら教えてください！！