コンボボックスの選択内容に基づいてAccessのテキストボックスに自動的に入力する - TechRepublic

従業員は、お互いの勤務先電話番号を素早く検索できる方法を求めています。リストから従業員の姓を選択すると、Access がその従業員の名と電話番号を出力できるようにしたいと考えています。

このフォームを作成するには、次の手順に従います。

1. 従業員データベースを開きます。
2. データベースウィンドウの「オブジェクト」の下にある「フォーム」をクリックし、「新規」ボタンをクリックして「OK」をクリックします。Access 2007では、「作成」タブをクリックし、「フォーム」グループの「フォームデザイン」をクリックします。
3. コントロールツールボックスのコンボボックスコントロールをクリックします。Access 2007では、「フォームデザインツール」の「デザイン」タブをクリックし、「コントロール」グループの「コンボボックス（フォームコントロール）」をクリックします。
4. コントロールを配置するフォーム内でクリックしてドラッグします。
5. 「次へ」をクリックします。
6. Employees テーブルを選択し、[次へ] をクリックします。
7. 従業員 ID、姓、名、電話番号のフィールドを選択します。
8. 「次へ」をクリックします。
9. 最初のテキスト ボックスのドロップダウン矢印をクリックし、「姓」をクリックします。
10. 「次へ」をクリックします。
11. 必要に応じてフィールドを調整し、「次へ」をクリックします。
12. 従業員連絡フォームを入力し、「完了」をクリックします。
13. コンボ ボックスのラベル コントロールをクリックし、ラベルを「姓」に変更します。
14. コントロール ツールボックス (Access 2003) またはコントロール グループ (Access 2007) でテキスト ボックス コントロールをクリックします。
15. クリックしてドラッグすると、コンボ ボックスの下にバインドされていないテキスト ボックス コントロールが作成されます。
16. テキスト ボックスのラベルを「名」に変更します。
17. コントロール ツールボックス (Access 2003) またはコントロール グループ (Access 2007) でテキスト ボックス コントロールをクリックします。
18. クリックしてドラッグし、最初のテキスト ボックスの下に非連結テキスト コントロールを作成します。
19. テキスト ボックスのラベルを「電話番号」に変更します (図 A )。

図A

1. コンボ ボックスを右クリックし、[プロパティ] を選択します。
2. [イベント] タブの [変更時] プロパティ ボックスをクリックし、[イベント プロシージャ] を選択します。
3. [ビルド] ボタンをクリックし、次のコードを入力します (図 B )。

Me.Text19 = Me.Combo17.Column(2)
Me.Text21 = Me.Combo17.Column(3)

図B

1. On Change イベント サブルーチンにエラー ハンドラーを追加します。
2. [Alt] + [Q]を押します。

従業員はこのフォームを使用して、姓で並べ替えられた従業員のリストをスクロールできるようになりました。すると、Access によってその従業員の名と会社の電話番号が直ちに入力されます (図 C )。

図C

Access のヒントを見逃していませんか?

Microsoft Access アーカイブをチェックして、その他の Access のヒントを確認してください。

毎週水曜日に配信される、Word、Excel、Access のヒントを特集した TechRepublic の無料 Microsoft Office Suite ニュースレターに自動的にサインアップすることで、ユーザーの生産性向上を支援します。