行ごとにサブフォームのコンボボックスの項目を変えるには？

解決

虎太郎 URL 2009-04-23 04:58:10 No: 141855

OS:WindowsXP SP2
Access Version:2003

フォームを起動した際に、コンボボックス「AreaID」の内容によって、同じコンボボックス「AreaSubID」の項目を変更したいと考えて以下のようなプログラムを作成しました。

Private Sub Form_Load()

'AreaID ：「地区」コンボボックス
'AreaSubID：「都道府県名」コンボボックス

strSQL = "SELECT "
strSQL = strSQL & "AreaSubID,PrefectureName "
strSQL = strSQL & "FROM "
strSQL = strSQL & "M_AREA_SUB "
strSQL = strSQL & "WHERE AreaID = " & Me.AreaID.Column(0) & " "
strSQL = strSQL & "ORDER BY AreaSubID "

Me.AreaSubID.RowSource = strSQL

End Sub

しかし、今のままでは下の画像のように近畿地方にも中部地方の更新がかかってしまう、つまり「都道府県名」の列の全てのコンボボックスが全く同じような更新がかかってしまうのが現状です。

ホームページに作成しているサブフォームの画像を置いてあります。

「都道府県名」の一覧を「地区」列の内容によって変える方法はございませんでしょうか？

ら 2009-04-24 09:14:12 No: 141856

私が確認しただけで４カ所くらいの掲示板に
同じような質問を投げていますよね。

「〜ではどうでしょうか?」
「それは、私のやりたい事とは違います」
以降返信無し
のようなやりとりになっていたと思います。

そもそも質問の説明がまずいのでは?
他の質問掲示板にアップした画像を見ろと言うのもどうかと。

少し、落ち着いて読んでみましょう。
http://www.hyuki.com/writing/techask.html

DBなら定義はどうなっているか、主キーの設定はとか
どうしたら再現出来るかくらいは書いてみませんか?

#マルチポストは、あちこち見ている人にとっては
#「景山なんとか」と変わりないくらい嫌っている人も
#いるので以外と損しますよ。

虎太郎 2009-04-25 06:46:08 No: 141857

>ら様

うう・・・すみません・・・

答えを急ぐ余りにいろんな掲示板に同じ質問をしてしまいました・・・
今回は質問取り消しということで、この件につきましては自分で解決策を模索していきたいと思います。

大変申し訳ございませんでした・・・