アクセス コンボボックス値をレポートに反映
アクセス初心者の為、やりたい事を検索しコードコピー等真似ることで
どうにか作っている状態です。
現在あと一歩のところでつまずいてしまったのでお力添え頂けると助かります。
環境:アクセス2003
------------------------------------------------------------------------------
フォームのコンボボックスで表示された値と一致するレコードを下にあるテキストボックスで表示
⇒レポートにその値を反映させたい
------------------------------------------------------------------------------
フォーム上:
送付先:「A社」 (コンボボックスで選択)
担当者:「Aさん」 (コンボボックスで選択するとテキストボックスで表示)
現在の状況:
フォーム上ではコンボボックスの値、その値と一致するレコードを該当テーブル(T_送付先)から
テキストボックスに表示されている。
レポート上でだけ何故か送付先の部分が元テーブル(T_送付先)
の送付先ではなく(フォームでは表示されてるのに)
数字が代わりに表示されてます。
担当者のテキストボックスにはフォームと同様に表示されてます。
------------------------------------------------------------------------------
フォーム上にある送付先のコンボボックスには↓
Private Sub コンボ8_AfterUpdate()
' コントロールの値と一致するレコードを検索する
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[ID] = " & Str(Nz(Me![コンボ8], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
------------------------------------------------------------------------------
フォームの送付先を表示するテキストボックスには↓
=[Forms]![F_送付先]![コンボ8]
------------------------------------------------------------------------------
フォーム上のコンボボックス、コンボ8のプロパティ
値集合ソース: SELECT T_送付先.ID, T_送付先.送付先 FROM T_送付先;
連結列: 1
------------------------------------------------------------------------------
テーブル(T_送付先)の一列目にID項目がありオートナンバー設定してあります。
その値が表示されてる気がします・・・
他にもコンボボックスを使用してますが、全部レポートには表示されています。
コントロールの値と一致するレコードを検索するこのコンボボックスだけが
表示されない為コードが影響しているのかな・・と考えられますが
お手上げ状態です・・・
どなたかアドバイス頂けると助かります。
よろしくお願いします。