※ ChatGPTを利用し、要約された質問です(原文:ACCESSでフォーム入力内容から自動で表示させる)
ACCESSでフォーム入力内容から自動で表示させる
このQ&Aのポイント
Accessを使用して、フォームに入力した銀行コードと支店コードに一致する銀行マスタテーブルの支店名を自動的に表示させる方法について教えてください。
顧客情報を管理するAccessデータベースには、顧客テーブルと銀行マスタテーブルがあります。銀行コードと支店コードをフォームに入力すると、該当する銀行マスタテーブルの支店名を表示させる方法を教えてください。
Accessのフォームで銀行コードと支店コードを入力すると、対応する銀行マスタテーブルの支店名を表示させたいです。重複する支店コードがある場合にも正しく表示される方法を教えてください。
ACCESSでフォーム入力内容から自動で表示させる
顧客の口座を管理するものをAccessで作成しています。
顧客テーブルに氏名等の情報があり、別に銀行マスタテーブルとして金融機関の情報がID、銀行コード、銀行名、支店コード、支店名、と入力されているものがあります。
銀行マスタテーブルは以下の形です
銀行コード 銀行名 支店コード 支店名
1 みずほ 1 東京営業部
1 みずほ 4 丸の内中央
1 みずほ 5 丸の内
5 UFJ 5 大阪
あらかじめ、氏名等の情報は入力してあり、これから口座情報を登録していくのですが、フォームに銀行コード、支店コードを入力した際に、その下に配置したテキストボックスに銀行名、支店名を表示させたいと考えています。
銀行コードの方は値が重複しても対応する銀行名は同じなので
=DLookUp("[銀行名]","銀行マスタ","[銀行コード] = " & [Forms]![H25]![銀行コード])
でなんとかできたのですが、支店コードは各金融機関毎に割り振られ、重複するものがあるため最上段のものが表示されてしまいます。(UFJの支店コード5を表示させたいのに、みずほの支店コード5が出てきてしまう。)
そこで、複数条件で検索できるよう以下のようにしてみたのですが、うまくいきませんでした。
=DLookUp("[銀行名]","銀行マスタ","[銀行コード] = " & [Forms]![H25]![銀行コード]' And 支店コード = #" & [Forms]![H25]![支店コード] "#")
イメージとしては、そのフォームに入力した銀行コードかつ支店コードが一致する銀行マスタテーブルの支店名を、フォームに配置したテキストボックスへ表示させれればいいのかなと考えてみたのですが。(上の例で言うと、銀行コードが5で支店コードが5だからテキストボックスに「大阪」と出したい。)
関数でもVBAでも構いませんので、どなたかご教示ください。
よろしくお願いいたします。
お礼
回答ありがとうございました。 おかげさまで無事に出来ました。 "や'、#の意味など勉強し直します。