アクセス コンボボックス値をレポートに反映

アクセス初心者の為、やりたい事を検索しコードコピー等真似ることで
どうにか作っている状態です。

現在あと一歩のところでつまずいてしまったのでお力添え頂けると助かります。

環境：アクセス2003
------------------------------------------------------------------------------
フォームのコンボボックスで表示された値と一致するレコードを下にあるテキストボックスで表示
　⇒レポートにその値を反映させたい
------------------------------------------------------------------------------
フォーム上：

送付先：「Ａ社」　（コンボボックスで選択）
担当者：「Ａさん」　（コンボボックスで選択するとテキストボックスで表示）

現在の状況：

フォーム上ではコンボボックスの値、その値と一致するレコードを該当テーブル（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項目がありオートナンバー設定してあります。
その値が表示されてる気がします・・・



他にもコンボボックスを使用してますが、全部レポートには表示されています。
コントロールの値と一致するレコードを検索するこのコンボボックスだけが
表示されない為コードが影響しているのかな・・と考えられますが
お手上げ状態です・・・


どなたかアドバイス頂けると助かります。
よろしくお願いします。

No.1 回答者： shinkami 回答日時： 2012/03/01 01:47

ここではVBAは不要です。

テーブルを少しいじってみましょう
多分
T_送付先（送付先ID、送付先名、担当者ID、……）送付先ID:オートナンバー、担当者ID：長整数型
T_担当者（担当者ID、担当者名、……）担当者ID：オートナンバー
の2つのテーブルがリレーションでつながっていると思います。

T_送付先をデザインモードで開き、担当者IDのフィールドをルックアップタグで
添付のように設定します。
１．連結列＝１　T_担当者の1番目の「担当者ID」
２．列数＝２　T_担当者の1番目の「担当者ID」2番目の「担当者名」
３．列幅＝０　T_担当者の1番目の「担当者ID」：表示しない　2番目の「担当者名」省略（自動）

以上でT_送付先を開くと数値でなく担当者名が表示されます。