Microsoft Access 掲示板

そもそも

コンボボックス絞り込みをメインの非連結テキストボックスに含まれている文字列をＬｉｋｅで抽出させています。

を、具体的にどのように行っていますか？

コンボボックスはそのコントロールソースに従って表示内容が決定されますが、もう少し具体的には、コントロールソースの内容を読み込むタイミングで決定されます。

そのタイミングの一つは、もちろん、「フォームを開いたとき」です。このタイミングでは特に気にすることなく自動で行われます。逆に言えば、通常これで十分なので、その他のタイミングで更新したい場合は「コントロールソースの読み込み直し処理」を自前で組まなければなりません

なので、上記指摘が「できている」のであれば「同じようにやればいい」です

フォーカスセットをしておくと更新するとネット情報で見た

こんな仕様はhirotonは知らないですね
（今回組んだシステムは）フォーカスセットをしておくと更新する（ように作ったのでフォーカスをセットすればいい）とかなら作れるかもしれません。（よくあると思います）
ならば、重要なのは、フォーカスをセットする方法ではなく、その時にどのような処理が行われるか？の方です。そこに「コントロールソースの読み込み直し処理」があると思います

フォーカスセットをしておくと更新するとネット情報で見たので下記にコード記述しております

正確には、フォーカスをセットしておいて、Textプロパティに代入すると、更新イベントが発生します。

 [Forms]![フォームＡMain]![txボックス].SetFocus
 [Forms]![フォームＡMain]![txボックス].Text = "所定文字列"
 DoCmd.Close acForm, "フォームＢ"

下記もご参考に。

値の代入で更新イベントを発生させる - hatena chips

ただし、hirotonさんも指摘されているように、コンボボックスのリストの絞り込みをどのようにしているかによります。
サブフォームが帳票フォームだったりするとさらに複雑な要因がでてきます。

上記の方法でうまくいけばいいですが、そうではない場合は、
絞り込みをどのようにしているのかと、コンボボックスは連結なのか、非連結なのか、サブフォームが帳票フォームなのか、、、などの情報が必要になります。

色々と説明不足してました（すみません）。フォームＡのサブフォームにあるコンボボックスの値集合ソースに　Like "" & [Forms]![フォームＡメイン]![tx文字] & ""　としており絞り込みさせています。
フォームＢが開かない場合には[tx文字]の更新後イベントに [サブフォーム].Form![コンボ].Requeryとしています。
要はこのRequeryをさせたいのです（フォームＢからＶＢコードでフォームＡメインの[tx文字]に代入）。

悩ましいですねぇ

>> 2のhatenaさん提示の方法でいいと思いますが、個人的にはあまりSetFocusを使いたくないので別解も載せておきます

ACCESS VBA 別フォームのイベントを呼び出す方法（VBAコード公開）（たすけてACCESSさん）

（デフォルトで生成されるあれこれを弄るといろいろと混乱するので、publicなそれ用のプロシージャを作るというのが、「hirotonならこうする」ですかね）

要はこのRequeryをさせたい

の観点からなら

Froms!フォームＡメイン.Form!サブフォーム.Form!コンボ.Requery

という方法もあります。が、プログラミング的な観点から同じ処理を別々な場所に記述するのは良くないので、今回の形なら「[tx文字]の更新後イベント」を発生させる方向が良いのでは、と思います

その他の方法として、「コンボボックスのリストが表示されるのはコンボボックスを使うとき」なので、コンボボックスのフォーカス取得時イベントでMe!コンボ.Requeryを行うなんて手法もあります

色々ありがとうございます。大変参考になりました。シンプルにサブフォームのコンボボックスに”Me!コンボ.Requery”でしまして上手くいきました。
参考にまで教えて欲しいのですが、この場合のフォーカスイベントは取得時の方がいいのでしょうか？取得後でも同じでしょうか？　これの使い分けがよく分かってないもので。

今回の場合はどちらでもいいでしょう。

例えば、特定の条件の場合はフォーカスさせずに別のコントロールにフォーカスさせたいというような場合は、取得時でないとだめですね。ただ、このような設計はたいてい悪手ですね。

特定の条件を満たすまで使用不可にしておくとか、、、ほかの方法を検討した方かいいです。