サブフォームからメインフォームの絞込をしたい

質問

サブフォームの項目からメインフォームの絞込をおこないたいのですが、うまくいきません

やりたいこととデータベースの状況は以下のとおりです

メインフォームに「会社名」があり、サブフォームにその会社の「ブランド名」（一社に対し複数存在する）とその「業種」（１つのブランドにつき１つ）がある。

メインフォーム----会社名（テキスト）
サブフォーム--ブランド名（テキスト）----業種（コンボボックス）

【やりたい事】
サブフォームにある業種をメインフォーム上のフィルタ用コンボボックスで選択し、選択した
業種を持つ会社名のみ表示したい（たとえばケーキを扱うA社とD社、Z社のみメインフォームで表示するようにする）

【コード】
現在以下のようなコードを作成しています。
テキスト欄に「業種」を打ち込み、コマンドボタンを押して絞り込む
※本当はコンボボックスで選択したいのですが・・・

Private Sub コマンドボタン名_Click()
Me![サブフォームのパーツ名].Form.Filter = "[コンボボタン-業種] Like '*" & Me.テキスト欄 & "*'"
Me![サブフォームのパーツ名].Form.FilterOn = True
Exit_コマンドボタン名_Click:
Exit Sub
End Sub

作成しましたが、レコードを移動するたびにパラメータ入力のポップアップがでてきます
フィルターもかからず、絞込が全くできていません

どなたか詳しい方ご教授よろしくお願いいたします

回答No.1

30246kiku · ベストアンサー

メインとサブフォームは、会社名でリンクされているのでしょうか？

以下が参考になると思います

サブフォームのフィールドを対象にメインフォームにフィルタをかける
http://hatenachips.blog34.fc2.com/blog-entry-235.html

お礼

探していたのはこれです！
うまくいきました！
ありがとうございました