ACCESSの技を

質問

ACCESS初心者なのですがデータ入力（テーブルに）フォームにてふりがなのコンボボックスを使い
顧客のふりがなで検索して顧客を選びそのままフォームの他の入力をしてテーブルに記録させる方法ってのは
ありますか？　顧客が多くて顧客のリストボックスではうっとおしくそのまえに「あ」と入れたら
あ行の顧客しかでないリストボックス　そんなのを作りたいです。
どなたか教えてもらえませんか？　それか参考になるＨＰを教えてください。
お願い致します。

回答No.1

noname#140971

普通は、[読み]を入力すると思います。

な
なか
なかむ
なかむら
*もんど

などなど。

顧客名簿:

ID_氏名_______読み
01_鈴木　一郎_すずき　いちろう
02_中村　主水_なかむら　もんど
03_中村　一郎_なかむら　いちろう

フォーム1:

顧客の読み：＿＿＿＿＿[な_____]
リスト＿顧客情報２：＿[02_中村　主水_なかむら　もんど]
＿＿＿＿＿＿＿＿＿：＿[03_中村　一郎_なかむら　いちろう]

値集合タイプ=テーブル/クエリ
値集合ソース=SELECT　顧客名簿.ID,　顧客名簿.氏名,　顧客名簿.読み　FROM　顧客名簿　WHERE　(((顧客名簿.読み)　Like　NZ(Forms!フォーム1!顧客の読み,"ん")　&　"*"));　
連結列=1

このような関係であれば、[リスト_顧客情報2]をリクエリするだけです。

NZ(Forms!フォーム1!顧客の読み,"ん")　<---- ヌルですべてが表示されるのを防ぐ工夫。

Private　Sub　顧客の読み_AfterUpdate()
　　　　Me.リスト_顧客情報2.Requery
　　　　If　Me.リスト_顧客情報2.ListCount　Then
　　　　　　　　Me.リスト_顧客情報2.Value　=　Me.リスト_顧客情報2.ItemData(0)
　　　　　　　　Me.リスト_顧客情報2.SetFocus
　　　　End　If
End　Sub

値集合タイプ=値リスト
列数=3
列幅=1cm;3cm;3cm

また、このように値リストのリストボックスを利用することも可能です。